summaryrefslogtreecommitdiff
path: root/guile-studio-configure.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guile-studio-configure.scm')
-rw-r--r--guile-studio-configure.scm8
1 files changed, 7 insertions, 1 deletions
diff --git a/guile-studio-configure.scm b/guile-studio-configure.scm
index 32b4a71..f682a1e 100644
--- a/guile-studio-configure.scm
+++ b/guile-studio-configure.scm
@@ -81,6 +81,10 @@
"Display the Guile Reference manual in Info mode."
(interactive)
(info "guile"))
+ (defun menu-bar-read-pictref ()
+ "Display the Picture Language manual in Info mode."
+ (interactive)
+ (info "picture-language"))
(defvar about-guile-studio-text
`((:face (variable-pitch font-lock-comment-face)
"Welcome to Guile Studio, an Emacs environment to play
@@ -92,7 +96,9 @@ with the "
:face variable-pitch
:link ("View Guile Manual" ,(lambda (_button) (menu-bar-read-guileref)))
- "\tView the Guile manual using Info\n"
+ "\tView the Guile manual.\n"
+ :link ("View Picture Language Manual" ,(lambda (_button) (menu-bar-read-pictref)))
+ "\tView the Picture Language manual.\n"
"\n")))
(defun about-guile-studio ()