tiny.el: fixed a bug introduced by previous commit.

diff --git a/tiny.el b/tiny.el
index 445d12206459ef0ac6e73443aa05b05569fc5634..bad31dd56321fae2359689a8f351664dd9b2dd67 100644 (file)
--- a/tiny.el
+++ b/tiny.el
@@ -156,7 +156,7 @@ expression."
       (setq fmt "%s"))
     ;;
     (let* ((lexpr (read expr))
-           (format-expressions (if (eq (car lexpr) 'list)
+           (format-expressions (if (and (listp lexpr) (eq (car lexpr) 'list))
                                    (mapconcat #'identity
                                               (loop for i from 0 to (1- (length lexpr))
                                                  collecting (format "(nth %d x)" i))