Commit 015b0d50 authored by Kim F. Storm's avatar Kim F. Storm

(describe-gnu-project): Rename from describe-project. Change users.

parent 4e44f5ce
......@@ -1341,7 +1341,7 @@ key, a click, or a menu-item"))
:help "Read the Introduction to Emacs Lisp Programming"))
(define-key menu-bar-help-menu [about-gnu-project]
'(menu-item "About GNU" describe-project
'(menu-item "About GNU" describe-gnu-project
:help "About the GNU System, GNU Project, and GNU/Linux"))
(define-key menu-bar-help-menu [about-emacs]
'(menu-item "About Emacs" about-emacs
......
......@@ -1148,7 +1148,7 @@ regardless of the value of this variable."
'("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 @@ Each element in the list should be a list of strings or pairs
'("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 @@ Each element in the list should be a list of strings or pairs
(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 @@ Type \\[describe-distribution] for information on "))
(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")
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment