emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/startup.el,v [EMACS_22_BASE]


From: Kim F. Storm
Subject: [Emacs-diffs] Changes to emacs/lisp/startup.el,v [EMACS_22_BASE]
Date: Thu, 06 Mar 2008 00:08:02 +0000

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Branch:         EMACS_22_BASE
Changes by:     Kim F. Storm <kfstorm>  08/03/06 00:08:01

Index: startup.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/startup.el,v
retrieving revision 1.436.2.15
retrieving revision 1.436.2.16
diff -u -b -r1.436.2.15 -r1.436.2.16
--- startup.el  2 Mar 2008 16:17:57 -0000       1.436.2.15
+++ startup.el  6 Mar 2008 00:08:01 -0000       1.436.2.16
@@ -1148,7 +1148,7 @@
           '("GNU/Linux"
             (lambda (button) (browse-url 
"http://www.gnu.org/gnu/linux-and-gnu.html";))
             "Browse http://www.gnu.org/gnu/linux-and-gnu.html";)
-        '("GNU" (lambda (button) (describe-project))
+        '("GNU" (lambda (button) (describe-gnu-project))
           "Display info on the GNU project")))
      " operating system.\n"
      :face variable-pitch "To quit a partially entered command, type "
@@ -1207,7 +1207,7 @@
           '("GNU/Linux"
             (lambda (button) (browse-url 
"http://www.gnu.org/gnu/linux-and-gnu.html";))
             "Browse http://www.gnu.org/gnu/linux-and-gnu.html";)
-        '("GNU" (lambda (button) (describe-project))
+        '("GNU" (lambda (button) (describe-gnu-project))
           "Display info on the GNU project.")))
      " operating system.\n"
      :face (lambda ()
@@ -1222,7 +1222,7 @@
      (lambda () emacs-copyright)
      "\n\n"
      :face variable-pitch
-     :link ("GNU and Freedom" (lambda (button) (describe-project)))
+     :link ("GNU and Freedom" (lambda (button) (describe-gnu-project)))
      "\tWhy we developed GNU Emacs, and the GNU operating system\n"
      :link ("Absence of Warranty" (lambda (button) (describe-no-warranty)))
      "\tGNU Emacs comes with "
@@ -1816,7 +1816,7 @@
   (insert "To follow a link, click Mouse-1 on it, or move to it and type 
RET.\n\n")
 
   (insert-button "GNU and Freedom"
-                'action (lambda (button) (describe-project))
+                'action (lambda (button) (describe-gnu-project))
                 'follow-link t)
   (insert "\t\tWhy we developed GNU Emacs and the GNU system\n")
 




reply via email to

[Prev in Thread] Current Thread [Next in Thread]