Index: slime.el
===================================================================
RCS file: /project/slime/cvsroot/slime/slime.el,v
retrieving revision 1.453
diff -c -r1.453 slime.el
*** slime.el	27 Jan 2005 19:54:42 -0000	1.453
--- slime.el	29 Jan 2005 22:53:49 -0000
***************
*** 3936,3942 ****
             (name (regexp-quote name)))
         (or 
          (re-search-forward 
!          (format "\\s *(def\\(\\s_\\|\\sw\\)*\\s +%s\\>" name) nil t)
          (re-search-forward 
           ;; FIXME: Isn't this far to general?
           (format "[( \t]%s\\>\\(\\s \\|$\\)" name) nil t)))
--- 3936,3942 ----
             (name (regexp-quote name)))
         (or 
          (re-search-forward 
!          (format "\\s *(def\\(\\s_\\|\\sw\\)*\\s +%s\\S_" name) nil t)
          (re-search-forward 
           ;; FIXME: Isn't this far to general?
           (format "[( \t]%s\\>\\(\\s \\|$\\)" name) nil t)))