[elpa] 01/02: [gnugo int] Invert ‘if ’ CONDITION and THEN/ELSE clauses.

[Thien-Thi Nguyen]

ttn pushed a commit to branch master
in repository elpa.

commit 45d0a6164365e26b3c2943bc80f4fe8f567289cb
Author: Thien-Thi Nguyen <address@hidden>
Date:   Sat Apr 5 13:51:21 2014 +0200

    [gnugo int] Invert ‘if’ CONDITION and THEN/ELSE clauses.
    
    * packages/gnugo/gnugo.el (gnugo/sgf-create):
    ...here, to place the "multiple" case as the ELSE.
---
 packages/gnugo/gnugo.el |   12 ++++++------
 1 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/packages/gnugo/gnugo.el b/packages/gnugo/gnugo.el
index 83f503c..e6769c0 100644
--- a/packages/gnugo/gnugo.el
+++ b/packages/gnugo/gnugo.el
@@ -2512,12 +2512,12 @@ A collection is a list of gametrees."
                    (push (setq node (NODE))
                          ls))
                  (prog1
-                     (if (seek ?\()
-                         ;; multiple
-                         (loop while (seek ?\()
-                               append (TREE ls))
-                       ;; singular
-                       (list ls))
+                     (if (not (seek ?\())
+                         ;; singular
+                         (list ls)
+                       ;; multiple
+                       (loop while (seek ?\()
+                             append (TREE ls)))
                    (seek-into ?\))))))
       (with-temp-buffer
         (if (not data-p)