diff options
author | Martin Rudalics <[email protected]> | 2007-04-21 22:00:45 +0000 |
---|---|---|
committer | Martin Rudalics <[email protected]> | 2007-04-21 22:00:45 +0000 |
commit | 33a9c08c34c97634f858d2427a27e63e37f28827 (patch) | |
tree | 1d037efeb84db86056429ba103ee8284183188d0 | |
parent | 861b8236efaaf144d49c0b021a5099d7e187f3cb (diff) |
(c-remove-any-local-eval-or-mode-variables): Use delete-region
instead of kill-line.
-rw-r--r-- | lisp/ChangeLog | 6 | ||||
-rw-r--r-- | lisp/progmodes/cc-mode.el | 5 |
2 files changed, 8 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5c3f99bbb1..15b8105e42 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2007-04-21 Martin Rudalics <[email protected]> + + * progmodes/cc-mode.el + (c-remove-any-local-eval-or-mode-variables): Use delete-region + instead of kill-line. + 2007-04-21 Alan Mackenzie <[email protected]> * progmodes/cc-cmds.el (c-electric-slash): Replace wrong use of diff --git a/lisp/progmodes/cc-mode.el b/lisp/progmodes/cc-mode.el index f5da0eecc2..c3c17a6f3c 100644 --- a/lisp/progmodes/cc-mode.el +++ b/lisp/progmodes/cc-mode.el @@ -820,7 +820,7 @@ compatible with old code; callers should always specify it." "$") nil t) (beginning-of-line) - (kill-line 1))) + (delete-region (point) (progn (end-of-line) (point))))) ;; Delete the first line, if we've got one, in case it contains a mode spec. (unless (and lv-point @@ -828,8 +828,7 @@ compatible with old code; callers should always specify it." (forward-line 0) (bobp))) (goto-char (point-min)) - (unless (eobp) - (kill-line 1))))) + (delete-region (point) (progn (end-of-line) (point)))))) (defun c-postprocess-file-styles () "Function that post processes relevant file local variables in CC Mode. |