[climacs-cvs] CVS climacs

[thenriksen]

Update of /project/climacs/cvsroot/climacs
In directory clnet:/tmp/cvs-serv26156

Modified Files:
	lisp-syntax.lisp 
Log Message:
Fixed symbol finding code and removed deprecated string indentation
rule.


--- /project/climacs/cvsroot/climacs/lisp-syntax.lisp	2006/05/16 21:36:29	1.73
+++ /project/climacs/cvsroot/climacs/lisp-syntax.lisp	2006/05/18 21:43:39	1.74
@@ -1999,7 +1999,7 @@
       (multiple-value-bind (symbol status)
           (when package
             (find-symbol symbol-name package))
-        (if symbol
+        (if (or symbol package)
             (values symbol status)
             (values (make-symbol symbol-name) nil))))))
 
@@ -2196,9 +2196,6 @@
 	       ;; inside a subexpression
 	       (indent-form syntax (elt-noncomment (children tree) (car path)) (cdr path)))))))	    
 
-(defmethod indent-form ((syntax lisp-syntax) (tree string-form) path)
-  (values tree 1))
-
 (defmethod indent-form ((syntax lisp-syntax) (tree token-form) path)
   (values tree 0))