Author: ek.kato
Date: Tue Aug 28 23:05:05 2007
New Revision: 4926

Modified:
   trunk/scm/prime.scm

Log:
* scm/prime.scm (prime-engine-send-command) : Bug fix for changes
  in r4693.


Modified: trunk/scm/prime.scm
==============================================================================
--- trunk/scm/prime.scm (original)
+++ trunk/scm/prime.scm Tue Aug 28 23:05:05 2007
@@ -817,7 +817,7 @@
     (let* ((result (prime-send-command
                    (prime-util-string-concat arg-list "\t")))
           (result-lines (string-split result "\n")))
-      (take! result-lines (- (length result-lines) 1)) ;; drop last "\n"
+      (take! result-lines (- (length result-lines) 2)) ;; drop last ("" "")
       (cdr result-lines)))) ;; drop status line
 
 (define prime-engine-conv-predict

Reply via email to