Commit dbf284be authored by Juanma Barranquero's avatar Juanma Barranquero

(momentary-string-display): After moving point, set POS variable to it to avoid

later errors once the buffer is modified.  Doc fix.
parent a6c327a8
2007-01-02 Juanma Barranquero <lekktu@gmail.com>
* subr.el (momentary-string-display): After moving point, set POS
variable to it to avoid later errors once the buffer is modified.
Doc fix.
2007-01-02 Alan Mackenzie <acm@muc.de>
* progmodes/cc-cmds.el (c-mask-paragraph): In a block comment,
......@@ -7,13 +13,13 @@
* wid-edit.el (widget-choose): Avoid ugly error for function keys.
* progmodes/cfengine.el (cfengine-font-lock-syntactic-keywords):
* progmodes/cfengine.el (cfengine-font-lock-syntactic-keywords):
Fix format of value.
* cus-edit.el (customize-unsaved): Renamed from customize-customized.
Change messages accordingly.
(customize-customized): Now alias.
2007-01-02 Juanma Barranquero <lekktu@gmail.com>
* files.el (version-control): Doc fix.
......@@ -2317,8 +2323,8 @@
2006-10-19 Jan Dj,Ad(Brv <jan.h.d@swipnet.se>
* select.el (ccl-check-utf-8, string-utf-8-p): New functions
(by Kenichi Handa).
* select.el (ccl-check-utf-8, string-utf-8-p): New functions (by
Kenichi Handa).
(xselect-convert-to-string): Decline requests for UTF8_STRING if
the selection is not UTF-8.
......@@ -1887,6 +1887,7 @@ menu bar menus and the frame title."
(defun momentary-string-display (string pos &optional exit-char message)
"Momentarily display STRING in the buffer at POS.
Display remains until next event is input.
If POS is a marker, only its position is used; its buffer is ignored.
Optional third arg EXIT-CHAR can be a character, event or event
description list. EXIT-CHAR defaults to SPC. If the input is
EXIT-CHAR it is swallowed; otherwise it is then available as
......@@ -1904,6 +1905,8 @@ If MESSAGE is nil, instructions to type EXIT-CHAR are displayed there."
(progn
(save-excursion
(goto-char pos)
;; To avoid trouble with out-of-bounds position
(setq pos (point))
;; defeat file locking... don't try this at home, kids!
(setq buffer-file-name nil)
(insert-before-markers string)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment