[slime-cvs] CVS update: slime/slime.el

[Luke Gorrie]

Update of /project/slime/cvsroot/slime
In directory common-lisp.net:/tmp/cvs-serv7729

Modified Files:
	slime.el 
Log Message:
>From Christohpe Rhodes:
Support for new SBCL reference types:
  :ansi-cl :glossary
  :ansi-cl :issue

Date: Mon Jun 28 03:22:27 2004
Author: lgorrie

Index: slime/slime.el
diff -u slime/slime.el:1.339 slime/slime.el:1.340
--- slime/slime.el:1.339	Sun Jun 27 08:04:07 2004
+++ slime/slime.el	Mon Jun 28 03:22:27 2004
@@ -5457,7 +5457,7 @@
           (and (eq where :ansi-cl)
                (symbolp type)
                (member (slime-cl-symbol-name type)
-                       '("function" "special-operator" "macro" "section"))))
+                       '("function" "special-operator" "macro" "section" "glossary" "issue"))))
       `(sldb-default-action sldb-lookup-reference
                             sldb-reference ,ref
                             face sldb-reference-face
@@ -5485,6 +5485,10 @@
        (case type
          (:section
           (browse-url (funcall common-lisp-hyperspec-section-fun what)))
+         (:glossary
+          (browse-url (funcall common-lisp-glossary-fun what)))
+         (:issue
+          (browse-url (funcall 'common-lisp-issuex what)))
          (t
           (hyperspec-lookup (if (symbolp what)
                                 (slime-cl-symbol-name what)