[slime-cvs] CVS slime/contrib

CVS User sboukarev sboukarev at common-lisp.net
Thu Sep 1 06:33:23 UTC 2011


Update of /project/slime/cvsroot/slime/contrib
In directory tiger.common-lisp.net:/tmp/cvs-serv21364

Modified Files:
	ChangeLog slime-c-p-c.el 
Log Message:
* slime-c-p-c.el (slime-complete-symbol*-fancy-bit): "imitate" a
close-paren, or a space, with exec-kbd-macro instead of inserting
them. Makes slime-complete-symbol*-fancy compatible with paredit
and probably other smart or "electric" stuff that could be bound
to these keys.


--- /project/slime/cvsroot/slime/contrib/ChangeLog	2011/08/30 15:34:10	1.490
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2011/09/01 06:33:23	1.491
@@ -1,3 +1,11 @@
+2011-09-01  Anton Kovalenko  <anton at sw4me.com>
+
+	* slime-c-p-c.el (slime-complete-symbol*-fancy-bit): "imitate" a
+	close-paren, or a space, with exec-kbd-macro instead of inserting
+	them. Makes slime-complete-symbol*-fancy compatible with paredit
+	and probably other smart or "electric" stuff that could be bound
+	to these keys.
+
 2011-08-30  Nikodemus Siivola  <nikodemus at random-state.net>
 
 	* slime-repl.el	(slime-repl-suppress-prompt): New variable. Bind to T to
--- /project/slime/cvsroot/slime/contrib/slime-c-p-c.el	2010/07/29 08:05:22	1.26
+++ /project/slime/cvsroot/slime/contrib/slime-c-p-c.el	2011/09/01 06:33:23	1.27
@@ -101,8 +101,8 @@
                (equal (char-before) ?\())))
         (when function-call-position-p
           (if (null args)
-              (insert-and-inherit ")")
-              (insert-and-inherit " ")
+              (execute-kbd-macro ")")
+              (execute-kbd-macro " ")
               (when (and (slime-background-activities-enabled-p)
                          (not (minibuffer-window-active-p (minibuffer-window))))
                 (slime-echo-arglist))))))))





More information about the slime-cvs mailing list