* 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:
Chong Yidong 2009-10-18 22:25:36 +00:00
parent 6873acca85
commit 7346a407f4
4 changed files with 23 additions and 3 deletions

View file

@ -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)