[mcclim-cvs] CVS mcclim/Drei

[thenriksen]

Update of /project/mcclim/cvsroot/mcclim/Drei
In directory clnet:/tmp/cvs-serv3729/Drei

Modified Files:
	lisp-syntax.lisp 
Log Message:
Delete, not kill, the symbol to be replaced when doing
symbol-completion.


--- /project/mcclim/cvsroot/mcclim/Drei/lisp-syntax.lisp	2007/01/17 13:31:50	1.18
+++ /project/mcclim/cvsroot/mcclim/Drei/lisp-syntax.lisp	2007/01/21 23:07:45	1.19
@@ -1736,7 +1736,7 @@
 after `string'."
   (let ((token (symbol-at-mark mark syntax)))
     (setf (offset mark) (start-offset token))
-    (forward-kill-expression mark syntax)
+    (forward-delete-expression mark syntax)
     (insert-sequence mark string)))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;