comparison lisp/electric.el @ 110188:92e4fa270c92

* lisp/electric.el (electric-indent-post-self-insert-function): Don't reindent with a sloppy indentation function.

110187:98d8e4cd2326

             ;; Not in a string or comment.
             (not (nth 8 (syntax-ppss))))
    ;; For newline, we want to reindent both lines and basically behave like
    ;; reindent-then-newline-and-indent (whose code we hence copied).
    (when (and (eq last-command-event ?\n)
               ;; Sanity check.
               (eq (char-before) last-command-event))
      (let ((pos (copy-marker (1- (point)) t)))
        (save-excursion
          (goto-char pos)

110188:92e4fa270c92

             ;; Not in a string or comment.
             (not (nth 8 (syntax-ppss))))
    ;; For newline, we want to reindent both lines and basically behave like
    ;; reindent-then-newline-and-indent (whose code we hence copied).
    (when (and (eq last-command-event ?\n)
               ;; Don't reindent the previous line if the indentation function
               ;; is not a real one.
               (not (memq indent-line-function
                          '(indent-relative indent-relative-maybe)))
               ;; Sanity check.
               (eq (char-before) last-command-event))
      (let ((pos (copy-marker (1- (point)) t)))
        (save-excursion
          (goto-char pos)