[slime-cvs] CVS slime

[CVS User trittweiler]

Update of /project/slime/cvsroot/slime
In directory cl-net:/tmp/cvs-serv30177

Modified Files:
	ChangeLog slime.el 
Log Message:
	* slime.el ([portability] lisp-mode-syntax-table): On Emacs21,
	make @ a prefix character like it's from Emacs22
	onward. `slime-symbol-name-at-point' was written with that
	assumption.


--- /project/slime/cvsroot/slime/ChangeLog	2009/02/27 16:16:23	1.1699
+++ /project/slime/cvsroot/slime/ChangeLog	2009/02/27 17:27:49	1.1700
@@ -1,5 +1,12 @@
 2009-02-27  Tobias C. Rittweiler  <tcr at freebits.de>
 
+	* slime.el ([portability] lisp-mode-syntax-table): On Emacs21,
+	make @ a prefix character like it's from Emacs22
+	onward. `slime-symbol-name-at-point' was written with that
+	assumption.
+
+2009-02-27  Tobias C. Rittweiler  <tcr at freebits.de>
+
 	* slime.el (slime-current-parser-state): Wrap `syntax-ppss' in a
 	`save-match-data'. This issue has been reported to the Emacs
 	maintainers.
--- /project/slime/cvsroot/slime/slime.el	2009/02/27 16:16:23	1.1134
+++ /project/slime/cvsroot/slime/slime.el	2009/02/27 17:27:49	1.1135
@@ -8602,6 +8602,11 @@
   (when (get-text-property (point) 'point-entered)
     (funcall (get-text-property (point) 'point-entered))))
 
+(when (slime-emacs-21-p)
+  ;; ?\@ is a prefix char from 22 onward, and
+  ;; `slime-symbol-name-at-point' was written with that assumption.
+  (modify-syntax-entry ?\@ "'   " lisp-mode-syntax-table))
+
 
 ;;;; slime.el in pretty colors