comparison lisp/emacs-lisp/lisp-mode.el @ 214:a1430f8459e5

*** empty log message ***
author Brian Preble <rassilon@gnu.org>
date Tue, 12 Mar 1991 19:57:55 +0000
parents 9fa9f6071bc1
children 287cf3ae183a
comparison
equal deleted inserted replaced
213:9fa9f6071bc1 214:a1430f8459e5
381 lisp-indent-function 381 lisp-indent-function
382 (not retry)) 382 (not retry))
383 (or (funcall lisp-indent-function indent-point state) 383 (or (funcall lisp-indent-function indent-point state)
384 normal-indent)) 384 normal-indent))
385 (t 385 (t
386 normal-indent))))))) 386 normal-indent))))))
387 387
388 (defun lisp-indent-function (indent-point state) 388 (defun lisp-indent-function (indent-point state)
389 (let ((normal-indent (current-column))) 389 (let ((normal-indent (current-column)))
390 (goto-char (1+ (elt state 1))) 390 (goto-char (1+ (elt state 1)))
391 (parse-partial-sexp (point) last-sexp 0 t) 391 (parse-partial-sexp (point) last-sexp 0 t)