[elpa] master 835c63e 12/46: tiny.el: fixed a small whitespace issue in `tiny-tokenize'.

[Oleh Krehel]

branch: master
commit 835c63e2bbd116bea47e6620b11bfc75e76cda6a
Author: oleh <w...@mail.ua>
Commit: oleh <w...@mail.ua>

    tiny.el: fixed a small whitespace issue in `tiny-tokenize'.
---
 tiny.el |    8 +++++---
 1 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/tiny.el b/tiny.el
index d186e73..06d77ca 100644
--- a/tiny.el
+++ b/tiny.el
@@ -306,10 +306,11 @@ m[START][SEPARATOR]END[EXPR][FORMAT]
                  (push " " out))
                 ((string= s ")")
                  ;; expect a close paren only if it's necessary
-                 (if (>= n-paren 2)
+                 (if (>= n-paren 0)
                      (decf n-paren)
                    (error "unexpected \")\""))
-                 (pop out)
+                 (when (string= (car out) " ")
+                   (pop out))
                  (push ") " out))
                 ((string= s "(")
                  ;; open paren is used sometimes
@@ -341,7 +342,8 @@ m[START][SEPARATOR]END[EXPR][FORMAT]
           (setq i j)
           (setq j (1+ i))))
       ;; last space
-      (pop out)
+      (when (string= (car out) " ")
+        (pop out))
       (concat
        (apply #'concat (nreverse out))
        (make-string n-paren ?\))))))