[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master ec14f08: Avoid errors in thing-at-point with 2nd ar
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] master ec14f08: Avoid errors in thing-at-point with 2nd argument non-nil |
Date: |
Sat, 05 Sep 2015 08:23:02 +0000 |
branch: master
commit ec14f087535282c188861815ac806024274185d5
Author: Eli Zaretskii <address@hidden>
Commit: Eli Zaretskii <address@hidden>
Avoid errors in thing-at-point with 2nd argument non-nil
* lisp/thingatpt.el (thing-at-point): Only call 'length' on
sequences. (Bug#21391)
---
lisp/thingatpt.el | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/lisp/thingatpt.el b/lisp/thingatpt.el
index 6e90b26..a9c539b 100644
--- a/lisp/thingatpt.el
+++ b/lisp/thingatpt.el
@@ -145,7 +145,7 @@ a symbol as a valid THING."
(let ((bounds (bounds-of-thing-at-point thing)))
(when bounds
(buffer-substring (car bounds) (cdr bounds)))))))
- (when (and text no-properties)
+ (when (and text no-properties (sequencep text))
(set-text-properties 0 (length text) nil text))
text))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master ec14f08: Avoid errors in thing-at-point with 2nd argument non-nil,
Eli Zaretskii <=