diff options
| author | Mark Oteiza <mvoteiza@udel.edu> | 2016-07-21 16:54:03 -0400 |
|---|---|---|
| committer | Mark Oteiza <mvoteiza@udel.edu> | 2016-07-21 16:54:03 -0400 |
| commit | 52cf0d5d98c51c3591ca5d376fd4e85cd9b72d7f (patch) | |
| tree | bcebafcf50ca28e36047ca009209cc417bdad529 | |
| parent | 6a3d031a12e4812fd792f97587981afe578040eb (diff) | |
| download | emacs-52cf0d5d98c51c3591ca5d376fd4e85cd9b72d7f.tar.gz | |
Do not show string-rectangle preview if minibuffer is empty
* lisp/rect.el (rectangle--string-preview): Remove condition that sets
preview string to the default replacement string.
| -rw-r--r-- | lisp/rect.el | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/lisp/rect.el b/lisp/rect.el index fb85b187d77..70a542d6724 100644 --- a/lisp/rect.el +++ b/lisp/rect.el @@ -410,9 +410,6 @@ With a prefix (or a FILL) argument, also fill too short lines." (defun rectangle--string-preview () (when rectangle-preview (let ((str (minibuffer-contents))) - (when (equal str "") - (setq str (or (car-safe minibuffer-default) - (if (stringp minibuffer-default) minibuffer-default)))) (when str (setq str (propertize str 'face 'rectangle-preview))) (with-selected-window rectangle--string-preview-window (unless (or (null rectangle--string-preview-state) |