diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2014-07-18 21:43:29 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2014-07-18 21:43:29 -0400 |
| commit | 31ca1841d2e25983fbcc44302ee9eff0b3a1554a (patch) | |
| tree | 6fa2c3b8e23119d4d2386ce18382ee9d8a9298e5 /lisp/rect.el | |
| parent | 1a5db9eb9ebde75aa94e52c8eab8d07868759444 (diff) | |
| download | emacs-31ca1841d2e25983fbcc44302ee9eff0b3a1554a.tar.gz | |
* lisp/rect.el (rectangle--string-preview): Don't assume there
a non-nil default.
Fixes: debbugs:17984
Diffstat (limited to 'lisp/rect.el')
| -rw-r--r-- | lisp/rect.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/rect.el b/lisp/rect.el index 4c3aa08d7bd..e536e3e372c 100644 --- a/lisp/rect.el +++ b/lisp/rect.el @@ -396,7 +396,7 @@ With a prefix (or a FILL) argument, also fill too short lines." (when (equal str "") (setq str (or (car-safe minibuffer-default) (if (stringp minibuffer-default) minibuffer-default)))) - (setq str (propertize str 'face 'region)) + (when str (setq str (propertize str 'face 'region))) (with-selected-window rectangle--string-preview-window (unless (or (null rectangle--string-preview-state) (equal str (car rectangle--string-preview-state))) |