* minibuffer.el (read-file-name): Check for repeat before putting
a default argument in file-name-history (Bug#4657). * emacs-lisp/lisp-mode.el (preceding-sexp): Recognize hash table read syntax (Bug#4737). * textmodes/sgml-mode.el (sgml-delete-tag): Use sgml-looking-back-at.
This commit is contained in:
parent
6873acca85
commit
7346a407f4
4 changed files with 23 additions and 3 deletions
|
@ -673,6 +673,11 @@ If CHAR is not a character, return nil."
|
|||
(when (eq (preceding-char) ??)
|
||||
(forward-char -1)))
|
||||
|
||||
;; Skip over hash table read syntax.
|
||||
(and (> (point) (1+ (point-min)))
|
||||
(looking-back "#s" (- (point) 2))
|
||||
(forward-char -2))
|
||||
|
||||
;; Skip over `#N='s.
|
||||
(when (eq (preceding-char) ?=)
|
||||
(let (labeled-p)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue