From 7629d4170a94ea69801640850420da0ba561b455 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 4 Oct 2006 04:13:09 +0000 Subject: [PATCH] (sh-prev-thing): Remove (forward-char 1) now that it's been made unnecessary by removing narrowing. --- lisp/ChangeLog | 11 +++++++---- lisp/progmodes/sh-script.el | 4 ---- 2 files changed, 7 insertions(+), 8 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 6c00cbada7..d62f5640da 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2006-10-04 Stefan Monnier + + * progmodes/sh-script.el (sh-prev-thing): Remove (forward-char 1) now + that it's been made unnecessary by removing narrowing. + 2006-10-03 Stefan Monnier * progmodes/sh-script.el (sh-prev-thing): Massage to untangle the @@ -285,8 +290,7 @@ 2006-09-22 Chong Yidong - * files.el (save-some-buffers-action-alist): Display diff in - view-mode. + * files.el (save-some-buffers-action-alist): Display diff in view-mode. 2006-09-22 Masatake YAMATO @@ -320,8 +324,7 @@ 2006-09-20 Kenichi Handa - * isearch.el (isearch-process-search-char): Cancel the previous - change. + * isearch.el (isearch-process-search-char): Cancel the previous change. (isearch-search-string): New function. (isearch-search): Use isearch-search-string. (isearch-lazy-highlight-search): Likewise. diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el index e1c1754895..a15cc216f7 100644 --- a/lisp/progmodes/sh-script.el +++ b/lisp/progmodes/sh-script.el @@ -2492,10 +2492,6 @@ we go to the end of the previous line and do not check for continuations." (if next (setq boundary next)) (sh-debug "Now at %d start=%d" (point) start) (setq kwd (sh-get-word)) - ;; The reason for this next line is unclear. - ;; says "the need for this was - ;; expermientally determined". --Stef - (when (< (point) start) (forward-char 1)) (if (member kwd (sh-feature sh-leading-keywords)) (progn (setq next (point)) -- 2.39.2