summaryrefslogtreecommitdiff
path: root/lisp/rfn-eshadow.el
diff options
context:
space:
mode:
authorMichael Albinus <michael.albinus@gmx.de>2013-08-20 12:04:13 +0200
committerMichael Albinus <michael.albinus@gmx.de>2013-08-20 12:04:13 +0200
commitc88586a9620e16040fa28ebb6e05926719360ba2 (patch)
tree20db1ba711b488d9b7a001aec660fb2a2aa73c5f /lisp/rfn-eshadow.el
parent236beba0c2cf9b757f7a25f1155a7f0f2d25f903 (diff)
downloademacs-c88586a9620e16040fa28ebb6e05926719360ba2.tar.gz
* minibuffer.el (completion--sifn-requote): Bind `non-essential'.
* rfn-eshadow.el (rfn-eshadow-update-overlay): Move binding of `non-essential' up.
Diffstat (limited to 'lisp/rfn-eshadow.el')
-rw-r--r--lisp/rfn-eshadow.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/rfn-eshadow.el b/lisp/rfn-eshadow.el
index cf5f1d16974..8d29c43980c 100644
--- a/lisp/rfn-eshadow.el
+++ b/lisp/rfn-eshadow.el
@@ -176,11 +176,11 @@ This is intended to be used as a minibuffer `post-command-hook' for
`file-name-shadow-mode'; the minibuffer should have already
been set up by `rfn-eshadow-setup-minibuffer'."
(condition-case nil
- (let ((goal (substitute-in-file-name (minibuffer-contents)))
- (mid (overlay-end rfn-eshadow-overlay))
- (start (minibuffer-prompt-end))
- (end (point-max))
- (non-essential t))
+ (let* ((non-essential t)
+ (goal (substitute-in-file-name (minibuffer-contents)))
+ (mid (overlay-end rfn-eshadow-overlay))
+ (start (minibuffer-prompt-end))
+ (end (point-max)))
(unless
;; Catch the common case where the shadow does not need to move.
(and mid