
21 Jan
2007
21 Jan
'07
11:07 p.m.
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))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;