projects
/
rrq
/
hourglass.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fixes; first version
[rrq/hourglass.git]
/
sitetool
/
sitetool.lsp
diff --git
a/sitetool/sitetool.lsp
b/sitetool/sitetool.lsp
index 19c3e808a3af072a3d5148a9ab077b0e5c7c9441..22bccd90904fc6d9a80f2a807655a38ab7c28acf 100644
(file)
--- a/
sitetool/sitetool.lsp
+++ b/
sitetool/sitetool.lsp
@@
-24,7
+24,8
@@
(tk:load-tcl "sitetool.tcl")
(tk:load-tcl "sitetool.tcl")
-(while true
- (tk:read-loop)
- (println (eval-string (or (read-line) (exit))))
- )
+(when nil
+ (while true
+ (tk:read-loop)
+ (println (eval-string (or (read-line) (exit))))
+ ))