tex-insert-quote' after single
'' opens quotes instead of closing
Without this, it's very hard to precede double quotes with the apostrophe character, i.e. insert the sequence '`` (quote-backquote-backquote), commonly useful in portuguese, for instance. * tex-mode.el (tex-insert-quote): Add ?' to the list of preceding chars making `tex-insert-quote' be in the "opening" context.
This commit is contained in:
parent
fddff05e88
commit
a40869789f
1 changed files with 5 additions and 1 deletions
|
@ -1331,7 +1331,9 @@ inserts \" characters."
|
|||
(goto-char saved)
|
||||
(insert (if (> saved (mark)) tex-close-quote tex-open-quote)))
|
||||
(if (or (memq (char-syntax (preceding-char)) '(?\( ?> ?\s))
|
||||
(memq (preceding-char) '(?~)))
|
||||
(memq (preceding-char) '(?~ ?')))
|
||||
;; We're in an "opening" context
|
||||
;;
|
||||
(if electric-pair-mode
|
||||
(if (looking-at (regexp-quote tex-close-quote))
|
||||
(forward-char (length tex-close-quote))
|
||||
|
@ -1339,6 +1341,8 @@ inserts \" characters."
|
|||
(insert tex-close-quote)
|
||||
(backward-char (length tex-close-quote)))
|
||||
(insert tex-open-quote))
|
||||
;; We're in a "closing" context.
|
||||
;;
|
||||
(if (looking-at (regexp-quote tex-close-quote))
|
||||
(forward-char (length tex-close-quote))
|
||||
(insert tex-close-quote))))))
|
||||
|
|
Loading…
Add table
Reference in a new issue