1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-26 10:49:33 +00:00

(bg-insert-moused-sexp): Use insert instead of insert-string.

This commit is contained in:
Pavel Janík 2001-11-26 16:17:44 +00:00
parent f4f34b33e1
commit 039f4cdaaf

View File

@ -209,12 +209,12 @@ Sexp is inserted into the buffer at point (where the text cursor is)."
(looking-at "[`'\"\\]\\|\\s(")))
nil)
(t
(insert-string " ")))
(insert-string moused-text)
(insert " ")))
(insert moused-text)
(or (eolp)
(looking-at "\\s.\\|\\s)")
(and (looking-at "'") (looking-at "\\sw")) ;hack for text mode
(save-excursion (insert-string " ")))))
(save-excursion (insert " ")))))
;;; Utility functions: