Update of /project/mcclim/cvsroot/mcclim/Drei In directory clnet:/tmp/cvs-serv20615
Modified Files: core.lisp Log Message: Forgot to commit this part of my tabify-changes.
--- /project/mcclim/cvsroot/mcclim/Drei/core.lisp 2007/12/10 21:25:12 1.10 +++ /project/mcclim/cvsroot/mcclim/Drei/core.lisp 2007/12/19 10:22:16 1.11 @@ -69,7 +69,7 @@
(defun indent-current-line (view point) (indent-line point (proper-line-indentation view point) - (and (indent-tabs-mode (buffer view)) + (and (use-tabs view) (tab-space-count view))))
(defun insert-pair (mark syntax &optional (count 0) (open #() (close #))) @@ -178,7 +178,8 @@ function." (do-buffer-region-lines (line mark1 mark2) (let ((indentation (proper-line-indentation view line))) - (indent-line line indentation (tab-space-count view))))) + (indent-line line indentation (and (use-tabs view) + (tab-space-count view))))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;