[Emacs-diffs] emacs/lisp ChangeLog simple.el

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/02/06 03:59:18

Modified files:
        lisp           : ChangeLog simple.el 

Log message:
        (kill-whole-line): Provide a default argument of 1.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15264&r2=1.15265
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/simple.el?cvsroot=emacs&r1=1.968&r2=1.969

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15264
retrieving revision 1.15265
diff -u -b -r1.15264 -r1.15265
--- ChangeLog   6 Feb 2009 00:40:28 -0000       1.15264
+++ ChangeLog   6 Feb 2009 03:59:15 -0000       1.15265
@@ -1,3 +1,11 @@
+2009-02-06  Glenn Morris  <address@hidden>
+
+       * simple.el (kill-whole-line): Provide a default argument of 1.
+
+       * mail/undigest.el (rmail-mail-separator): Delete.
+       (undigestify-rmail-message, unforward-rmail-message): Update for
+       mbox Rmail.
+
 2009-02-05  Kenichi Handa  <address@hidden>
 
        * international/fontset.el (script-representative-chars): Remove

Index: simple.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/simple.el,v
retrieving revision 1.968
retrieving revision 1.969
diff -u -b -r1.968 -r1.969
--- simple.el   27 Jan 2009 20:09:38 -0000      1.968
+++ simple.el   6 Feb 2009 03:59:18 -0000       1.969
@@ -3219,6 +3219,7 @@
 \(This is meant to make \\[repeat] work well with negative arguments.\)
 If ARG is zero, kill current line but exclude the trailing newline."
   (interactive "p")
+  (or arg (setq arg 1))
   (if (and (> arg 0) (eobp) (save-excursion (forward-visible-line 0) (eobp)))
       (signal 'end-of-buffer nil))
   (if (and (< arg 0) (bobp) (save-excursion (end-of-visible-line) (bobp)))