--- thingatpt.el	2015-09-01 10:49:03.169747488 +0900
+++ thingatpt_patched.el	2015-09-01 10:50:18.896747480 +0900
@@ -145,7 +145,7 @@
            (let ((bounds (bounds-of-thing-at-point thing)))
              (when bounds
                (buffer-substring (car bounds) (cdr bounds)))))))
-    (when (and text no-properties)
+    (when (and text (sequencep text) no-properties)
       (set-text-properties 0 (length text) nil text))
     text))