/[emacs]/emacs/lisp/progmodes/scheme.el
ViewVC logotype

Diff of /emacs/lisp/progmodes/scheme.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.39 by pj, Mon Jul 16 12:22:59 2001 UTC revision 1.39.4.1 by lektu, Wed Jul 3 11:43:00 2002 UTC
# Line 430  that variable's value is a string." Line 430  that variable's value is a string."
430      (parse-partial-sexp (point) calculate-lisp-indent-last-sexp 0 t)      (parse-partial-sexp (point) calculate-lisp-indent-last-sexp 0 t)
431      (if (and (elt state 2)      (if (and (elt state 2)
432               (not (looking-at "\\sw\\|\\s_")))               (not (looking-at "\\sw\\|\\s_")))
433          ;; car of form doesn't seem to be a a symbol          ;; car of form doesn't seem to be a symbol
434          (progn          (progn
435            (if (not (> (save-excursion (forward-line 1) (point))            (if (not (> (save-excursion (forward-line 1) (point))
436                        calculate-lisp-indent-last-sexp))                        calculate-lisp-indent-last-sexp))

Legend:
Removed from v.1.39  
changed lines
  Added in v.1.39.4.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26