diff options
Diffstat (limited to 'lisp/makesum.el')
| -rw-r--r-- | lisp/makesum.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/makesum.el b/lisp/makesum.el index c77a248eb45..4b5cd036f94 100644 --- a/lisp/makesum.el +++ b/lisp/makesum.el @@ -1,7 +1,7 @@ ;;; makesum.el --- generate key binding summary for Emacs -;; Copyright (C) 1985, 2001, 2002, 2003, 2004, 2005, -;; 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. +;; Copyright (C) 1985, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, +;; 2009, 2010 Free Software Foundation, Inc. ;; Maintainer: FSF ;; Keywords: help @@ -98,7 +98,7 @@ Previous contents of that buffer are killed first." (forward-line half) (while (< half nlines) (setq half (1+ half)) - (setq line (buffer-substring (point) (save-excursion (end-of-line) (point)))) + (setq line (buffer-substring (point) (line-end-position))) (setq lines (cons line lines)) (delete-region (point) (progn (forward-line 1) (point))))) (setq lines (nreverse lines)) @@ -112,5 +112,4 @@ Previous contents of that buffer are killed first." (provide 'makesum) -;; arch-tag: c2383336-fc89-46ad-8110-ded42bffaee3 ;;; makesum.el ends here |