Index: hyperspec.el
===================================================================
RCS file: /project/slime/cvsroot/slime/hyperspec.el,v
retrieving revision 1.14
diff -u -r1.14 hyperspec.el
--- hyperspec.el	3 Mar 2009 10:03:59 -0000	1.14
+++ hyperspec.el	3 Mar 2009 11:29:17 -0000
@@ -1174,16 +1174,20 @@
         (")" "02_db.htm")
         (";" "02_dd.htm")))
 
-(defun common-lisp-hyperspec-lookup-reader-macro (macro)
+(defun common-lisp-hyperspec-reader-macro (macro)
   "Browse the CLHS entry for the reader-macro MACRO."
   (interactive 
-   (list (completing-read "Look up reader-macro: " 
-			  common-lisp-hyperspec-reader-macros nil t
-			  (common-lisp-hyperspec-reader-macro-at-point))))
+   (let ((completion-ignore-case t))
+     (list (completing-read "Look up reader-macro: " 
+                            common-lisp-hyperspec-reader-macros nil t
+                            (common-lisp-hyperspec-reader-macro-at-point)))))
   (browse-url
    (concat common-lisp-hyperspec-root "Body/"
 	   (gethash macro common-lisp-hyperspec-reader-macros))))
 
+(eval-when (load eval)
+  (defalias 'hyperspec-lookup-reader-macro 'common-lisp-hyperspec-reader-macro))
+
 (defun common-lisp-hyperspec-reader-macro-at-point ()
   (let ((regexp "\\(#.?\\)\\|\\([\"',`';()]\\)"))
     (when (looking-back regexp nil t)
Index: slime.el
===================================================================
RCS file: /project/slime/cvsroot/slime/slime.el,v
retrieving revision 1.1140
diff -u -r1.1140 slime.el
--- slime.el	3 Mar 2009 10:04:09 -0000	1.1140
+++ slime.el	3 Mar 2009 11:29:41 -0000
@@ -578,7 +578,7 @@
     (?f slime-describe-function)
     (?h slime-hyperspec-lookup)
     (?~ common-lisp-hyperspec-format)
-    (?# common-lisp-hyperspec-lookup-reader-macro)))
+    (?# common-lisp-hyperspec-reader-macro)))
   
 (defvar slime-who-map (make-sparse-keymap)
   "Keymap for who-xref commands. Bound to a prefix key.")
Index: doc/slime.texi
===================================================================
RCS file: /project/slime/cvsroot/slime/doc/slime.texi,v
retrieving revision 1.69
diff -u -r1.69 slime.texi
--- doc/slime.texi	26 Feb 2009 21:50:00 -0000	1.69
+++ doc/slime.texi	3 Mar 2009 11:29:48 -0000
@@ -1009,8 +1009,10 @@
 
 @kbditem{C-c C-d ~, common-lisp-hyperspec-format}
 Lookup a @emph{format character} in the @cite{Common Lisp Hyperspec}.
-@end table
 
+@kbditem{C-c C-d #, common-lisp-hyperspec-reader-macro}
+Lookup a @emph{reader macro} in the @cite{Common Lisp Hyperspec}.
+@end table
 
 @c ----------------------- 
 @node Cross-reference
