[Emacs-diffs] /srv/bzr/emacs/trunk r106339: * lisp/electric.el (electric-pair-post-self-insert-function): Let user

[Stefan Monnier]

------------------------------------------------------------
revno: 106339
fixes bug(s): http://debbugs.gnu.org/cgi/bugreport.cgi?bug=9932
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Wed 2011-11-09 10:10:25 -0500
message:
  * lisp/electric.el (electric-pair-post-self-insert-function): Let user
  turn it off buffer-locally.
modified:
  lisp/ChangeLog
  lisp/electric.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-11-09 15:00:32 +0000
+++ b/lisp/ChangeLog    2011-11-09 15:10:25 +0000
@@ -1,5 +1,8 @@
 2011-11-09  Stefan Monnier  <address@hidden>
 
+       * electric.el (electric-pair-post-self-insert-function): Let user
+       turn it off buffer-locally (bug#9932).
+
        * progmodes/python.el (python-beginning-of-statement):
        Rewrite (bug#2703).
 

=== modified file 'lisp/electric.el'
--- a/lisp/electric.el  2011-10-19 12:54:24 +0000
+++ b/lisp/electric.el  2011-11-09 15:10:25 +0000
@@ -284,6 +284,7 @@
 
 (defun electric-pair-post-self-insert-function ()
   (let* ((syntax (and (eq (char-before) last-command-event) ; Sanity check.
+                      electric-pair-mode
                       (let ((x (assq last-command-event electric-pair-pairs)))
                         (cond
                          (x (if (eq (car x) (cdr x)) ?\" ?\())