
26 Jun
2009
26 Jun
'09
9:19 p.m.
While I appreciate that it is better to try not too hard here, I run into #.foo not completing often enough. This: (defun slime-beginning-of-symbol () "Move to the beginning of the CL-style symbol at point." (while (re-search-backward "\\(\\sw\\|\\s_\\|\\s\\.\\|\\s\\\\|[#@|]\\)\\=" nil t)) (re-search-forward "\\=#[<|]" nil t) (when (and (looking-at "@") (eq (char-before) ?\,)) (forward-char)) (when (and (looking-at "#\\.")) (forward-char 2))) addresses the issue. Normally I would just commit this, but given the recent work on slime-symbol I was not sure if could be controversial? Cheers, -- Nikodemus