diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2012-12-05 20:39:03 -0500 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2012-12-05 20:39:03 -0500 |
commit | 4b5c89eefeb70315056af58754f00ee79767cc21 (patch) | |
tree | e1d237c64141877fef04c9f2ac404f21d86fe6b8 | |
parent | 644d3f0dbf38eca7a746e0fb5a7a0dd20d214949 (diff) | |
download | emacs-4b5c89eefeb70315056af58754f00ee79767cc21.tar.gz |
* lisp/minibuf-eldef.el (minibuf-eldef-update-minibuffer): Don't mess with
the `intangible' property.
Suggested by Christopher Schmidt <christopher@ch.ristopher.com>
-rw-r--r-- | lisp/ChangeLog | 6 | ||||
-rw-r--r-- | lisp/minibuf-eldef.el | 10 |
2 files changed, 9 insertions, 7 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c2e9609451c..cb5118cde40 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2012-12-06 Stefan Monnier <monnier@iro.umontreal.ca> + + * minibuf-eldef.el (minibuf-eldef-update-minibuffer): Don't mess with + the `intangible' property. + Suggested by Christopher Schmidt <christopher@ch.ristopher.com> + 2012-12-05 Deniz Dogan <deniz@dogan.se> * net/rcirc.el (rcirc-urls): Update documentation. diff --git a/lisp/minibuf-eldef.el b/lisp/minibuf-eldef.el index 950c28b227f..c9e663eedba 100644 --- a/lisp/minibuf-eldef.el +++ b/lisp/minibuf-eldef.el @@ -152,15 +152,11 @@ been set up by `minibuf-eldef-setup-minibuffer'." (and (= (point-max) minibuf-eldef-initial-buffer-length) (string-equal (minibuffer-contents-no-properties) minibuf-eldef-initial-input))) - ;; swap state + ;; Swap state. (setq minibuf-eldef-showing-default-in-prompt (not minibuf-eldef-showing-default-in-prompt)) - (cond (minibuf-eldef-showing-default-in-prompt - (overlay-put minibuf-eldef-overlay 'invisible nil) - (overlay-put minibuf-eldef-overlay 'intangible nil)) - (t - (overlay-put minibuf-eldef-overlay 'invisible t) - (overlay-put minibuf-eldef-overlay 'intangible t))))) + (overlay-put minibuf-eldef-overlay 'invisible + (not minibuf-eldef-showing-default-in-prompt)))) ;;;###autoload |