diff options
Diffstat (limited to 'lisp/hippie-exp.el')
| -rw-r--r-- | lisp/hippie-exp.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/hippie-exp.el b/lisp/hippie-exp.el index 7d14d780e2e..ad233b2a507 100644 --- a/lisp/hippie-exp.el +++ b/lisp/hippie-exp.el @@ -296,7 +296,7 @@ undoes the expansion." (message "No further expansions found")) (ding)) (if (and hippie-expand-verbose - (not (window-minibuffer-p (selected-window)))) + (not (window-minibuffer-p))) (message "Using %s" (nth he-num hippie-expand-try-functions-list))))) (if (and (>= he-num 0) @@ -305,7 +305,7 @@ undoes the expansion." (setq he-num -1) (he-reset-string) (if (and hippie-expand-verbose - (not (window-minibuffer-p (selected-window)))) + (not (window-minibuffer-p))) (message "Undoing expansions")))))) ;; Initializes the region to expand (to between BEG and END). @@ -978,7 +978,7 @@ The argument OLD has to be nil the first call of this function, and t for subsequent calls (for further possible expansions of the same string). It returns t if a new expansion is found, nil otherwise." (let ((expansion ()) - (flag (if (frame-visible-p (window-frame (selected-window))) + (flag (if (frame-visible-p (window-frame)) 'visible t))) (unless old (he-init-string (he-dabbrev-beg) (point)) |