[slime-devel] Suggestion: slime-symbol-at-point

I found it confusing that slime-symbol-at-point doesn't really return the symbol at point. An example: (defun install-package (source system packagename)... Placing the point on the first "i" in the function name and pressing C-c C-d returns the decription for defun, not install-package. The following fixes it, but I keep scratching my head to understand why the (skip-syntax-backward "-") was originally there -- I can't find a purpose for it. --J. diff -c /home/jwr/Mail/.software/slime/slime.el /home/jwr/Mail/.software/slime/slime.el.original --- /home/jwr/Mail/.software/slime/slime.el 2004-02-25 03:48:33.000000000 -0800 +++ /home/jwr/Mail/.software/slime/slime.el.original 2004-02-25 03:48:33.000000000 -0800 @@ -769,7 +769,6 @@ (defun slime-symbol-at-point () "Return the symbol at point, otherwise nil." (save-excursion - (skip-syntax-backward "-") (let ((string (thing-at-point 'symbol))) (if string (intern (substring-no-properties string)) nil))))

Jan Rychter <jan@rychter.com> writes:
The following fixes it, but I keep scratching my head to understand why the (skip-syntax-backward "-") was originally there -- I can't find a purpose for it.
It was there to skip backwards across whitespace. I think that's quite useful, C-h f does that to. But of course it failed if point was immediately before a symbol. Should be fixed in CVS. Thanks for the report. Helmut.

"Helmut" == Helmut Eller <e9626484@stud3.tuwien.ac.at> writes: Helmut> Jan Rychter <jan@rychter.com> writes: The following fixes it, but I keep scratching my head to understand why the (skip-syntax-backward "-") was originally there -- I can't find a purpose for it.
Helmut> It was there to skip backwards across whitespace. I think Helmut> that's quite useful, C-h f does that to. Well, I couldn't quite figure out why that's helpful. Helmut> But of course it failed if point was immediately before a Helmut> symbol. Should be fixed in CVS. Thanks for the report. Works much better now, thanks! --J.
participants (2)
-
Helmut Eller
-
Jan Rychter