branch: master
commit 03aef85b46c1b23d4e8ad20099be18ae0d5264ad
Author: oleh <w...@mail.ua>
Commit: oleh <w...@mail.ua>

    tiny.el: fixed a bug introduced by previous commit.
---
 tiny.el |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/tiny.el b/tiny.el
index 445d122..bad31dd 100644
--- 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))

Reply via email to