Browse files

closes #2: don't bind `autopair-*` commands to parens if syntax tabl…

…e appears broken
  • Loading branch information...
joaotavora committed Jul 22, 2012
1 parent 71a72d3 commit bc9bb4b3e8c809b5787c40f0edf5aa522f614ce6
Showing with 2 additions and 1 deletion.
  1. +2 −1 autopair.el
@@ -409,7 +409,8 @@ syntax table and the local value of `autopair-extra-pairs'."
(syntax-class syntax-entry)))
(pair (and syntax-entry
(cdr syntax-entry))))
- (cond ((eq class (car (string-to-syntax "(")))
+ (cond ((and (eq class (car (string-to-syntax "(")))
+ pair)
;; syntax classes "opening parens" and "close parens"
(define-key map (string char) 'autopair-insert-opening)
(define-key map (string pair) 'autopair-skip-close-maybe))

0 comments on commit bc9bb4b

Please sign in to comment.