[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/indent.el
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/indent.el |
Date: |
Tue, 04 Feb 2003 06:30:07 -0500 |
Index: emacs/lisp/indent.el
diff -c emacs/lisp/indent.el:1.52 emacs/lisp/indent.el:1.53
*** emacs/lisp/indent.el:1.52 Fri Nov 29 10:06:59 2002
--- emacs/lisp/indent.el Tue Feb 4 06:30:05 2003
***************
*** 303,318 ****
With optional argument, move forward N-1 lines first.
From the beginning of the line, moves past the left-margin indentation, the
fill-prefix, and any indentation used for centering or right-justifying the
! line, but does not move past any whitespace that was explicitly inserted
\(such as a tab used to indent the first line of a paragraph)."
(interactive "p")
(beginning-of-line n)
(skip-chars-forward " \t")
;; Skip over fill-prefix.
! (if (and fill-prefix
(not (string-equal fill-prefix "")))
(if (equal fill-prefix
! (buffer-substring
(point) (min (point-max) (+ (length fill-prefix) (point)))))
(forward-char (length fill-prefix)))
(if (and adaptive-fill-mode adaptive-fill-regexp
--- 303,318 ----
With optional argument, move forward N-1 lines first.
From the beginning of the line, moves past the left-margin indentation, the
fill-prefix, and any indentation used for centering or right-justifying the
! line, but does not move past any whitespace that was explicitly inserted
\(such as a tab used to indent the first line of a paragraph)."
(interactive "p")
(beginning-of-line n)
(skip-chars-forward " \t")
;; Skip over fill-prefix.
! (if (and fill-prefix
(not (string-equal fill-prefix "")))
(if (equal fill-prefix
! (buffer-substring
(point) (min (point-max) (+ (length fill-prefix) (point)))))
(forward-char (length fill-prefix)))
(if (and adaptive-fill-mode adaptive-fill-regexp
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/indent.el,
Juanma Barranquero <=