aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorSergey Poznyakoff <gray@gnu.org.ua>2011-06-15 17:35:23 +0300
committerSergey Poznyakoff <gray@gnu.org.ua>2011-06-15 17:35:23 +0300
commit393fc19572aee23f558f36beedec1a3ee2c89cc2 (patch)
treebfa049c926aa05d1ecd1393517e84f66313db101 /src
parentd688c9630db459ec13e5311adaee05e651b3789d (diff)
downloadellinika-393fc19572aee23f558f36beedec1a3ee2c89cc2.tar.gz
ellinika-393fc19572aee23f558f36beedec1a3ee2c89cc2.tar.bz2
Remove unnecessary debugging output.
Diffstat (limited to 'src')
-rw-r--r--src/cgi-bin/conj.scm41
1 files changed, 0 insertions, 1 deletions
diff --git a/src/cgi-bin/conj.scm4 b/src/cgi-bin/conj.scm4
index 8fca3f0..fcacaad 100644
--- a/src/cgi-bin/conj.scm4
+++ b/src/cgi-bin/conj.scm4
@@ -123,7 +123,6 @@ ifelse(IFACE,[CGI],(cgi:init))
123 (display "</table>")) 123 (display "</table>"))
124 124
125(define (transpose mtx) 125(define (transpose mtx)
126 (display "<!--\n")(write mtx)(display "\n-->")
127 (let* ((w (length (car mtx))) 126 (let* ((w (length (car mtx)))
128 (res (make-list w))) 127 (res (make-list w)))
129 (do ((i 0 (1+ i))) 128 (do ((i 0 (1+ i)))

Return to:

Send suggestions and report system problems to the System administrator.