Mercurial > emacs
comparison lisp/calc/calc-help.el @ 68638:1028f625e637
(calc-full-help): Update the copyright year.
author | Jay Belanger <jay.p.belanger@gmail.com> |
---|---|
date | Sun, 05 Feb 2006 16:38:15 +0000 |
parents | 6bf177f8065b |
children | 7a3f13e2dd57 c5406394f567 |
comparison
equal
deleted
inserted
replaced
68637:341b24d692de | 68638:1028f625e637 |
---|---|
412 (interactive) | 412 (interactive) |
413 (with-output-to-temp-buffer "*Help*" | 413 (with-output-to-temp-buffer "*Help*" |
414 (princ (format "GNU Emacs Calculator version %s.\n" | 414 (princ (format "GNU Emacs Calculator version %s.\n" |
415 calc-version)) | 415 calc-version)) |
416 (princ " By Dave Gillespie.\n") | 416 (princ " By Dave Gillespie.\n") |
417 (princ " Copyright (C) 2005 Free Software Foundation, Inc.\n\n") | 417 (princ " Copyright (C) 2006 Free Software Foundation, Inc.\n\n") |
418 (princ "Type `h s' for a more detailed summary.\n") | 418 (princ "Type `h s' for a more detailed summary.\n") |
419 (princ "Or type `h i' to read the full Calc manual on-line.\n\n") | 419 (princ "Or type `h i' to read the full Calc manual on-line.\n\n") |
420 (princ "Basic keys:\n") | 420 (princ "Basic keys:\n") |
421 (let* ((calc-full-help-flag t)) | 421 (let* ((calc-full-help-flag t)) |
422 (mapcar (function (lambda (x) (princ (format " %s\n" x)))) | 422 (mapcar (function (lambda (x) (princ (format " %s\n" x)))) |