Berkeley CSUA MOTD:Entry 39843
Berkeley CSUA MOTD
 
WIKI | FAQ | Tech FAQ
http://csua.com/feed/
2025/07/08 [General] UID:1000 Activity:popular
7/8     

2005/9/23 [Computer/SW/Editors/Emacs] UID:39843 Activity:nil
9/21    Emacs sucks.
emacs user was here
\- you may wish to use:
(defun next-line (arg)
  "Move cursor vertically down ARG lines.
   ... If at the end of the buffer, it will add up to
  next-line-max-inserted-newlines newline characters to
  allow moving to the next line."
  (interactive "p")
  (if (= arg 1)
      (let ((opoint (point)))
        (forward-line 1)
        (if (or (= opoint (point))
                (not (eq (preceding-char) ?\n)))
            (if (< (- (point)
                      (save-excursion
                        (skip-chars-backward "\n")
                        (point)))
                   next-line-max-inserted-newlines)
                (insert ?\n))
          (goto-char opoint)
          (next-line-internal arg)))
    (next-line-internal arg))
  nil)
\_ Just add (setq next-line-add-newlines nil) to your ~/.emacs.
   \- the above lets you pick how many blank-lines are ok. i set to 2.
      i find this more useful than the binary option.