Mercurial > emacs
changeset 675:85fd29f25c75
*** empty log message ***
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 03 Jun 1992 02:55:55 +0000 |
parents | d5c90f190057 |
children | a9a0a9efe0de |
files | lisp/calendar/calendar.el lisp/subr.el src/lread.c |
diffstat | 3 files changed, 10 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calendar/calendar.el Tue Jun 02 19:37:40 1992 +0000 +++ b/lisp/calendar/calendar.el Wed Jun 03 02:55:55 1992 +0000 @@ -1,4 +1,5 @@ -;; Calendar functions. +;;; calendar.el --- Calendar functions. + ;; Copyright (C) 1988, 1989, 1990, 1991 Free Software Foundation, Inc. ;; This file is part of GNU Emacs. @@ -737,6 +738,7 @@ "Extract the year part of DATE which has the form (month day year)." (` (car (cdr (cdr (, date)))))) +;;;###autoload (defun calendar (&optional arg) "Display a three-month calendar in another window. The three months appear side by side, with the current month in the middle @@ -2567,3 +2569,4 @@ (provide 'calendar) +;;; calendar.el ends here
--- a/lisp/subr.el Tue Jun 02 19:37:40 1992 +0000 +++ b/lisp/subr.el Wed Jun 03 02:55:55 1992 +0000 @@ -165,6 +165,7 @@ (fset 'send-region 'process-send-region) (fset 'show-buffer 'set-window-buffer) (fset 'buffer-flush-undo 'buffer-disable-undo) +(fset 'eval-current-buffer 'eval-buffer) ; alternate names (fset 'string= 'string-equal)
--- a/src/lread.c Tue Jun 02 19:37:40 1992 +0000 +++ b/src/lread.c Wed Jun 03 02:55:55 1992 +0000 @@ -500,9 +500,11 @@ #ifndef standalone -DEFUN ("eval-buffer", Feval_buffer, Seval_buffer, 0, 2, "bBuffer: ", - "Execute BUFFER as Lisp code. If BUFFER is nil, use the current buffer.\n\ -Programs can pass argument PRINTFLAG which controls printing of output:\n\ +DEFUN ("eval-buffer", Feval_buffer, Seval_buffer, 0, 1, "", + "Execute the current buffer as Lisp code.\n\ +Programs can pass two arguments, BUFFER and PRINTFLAG.\n\ +BUFFER is the buffer to evaluate (nil means use current buffer).\n\ +PRINTFLAG controls printing of output:\n\ nil means discard it; anything else is stream for print.\n\ \n\ If there is no error, point does not move. If there is an error,\n\