HCoop
/
clinton
/
lisp-on-lines.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
db4fe34
)
added a nil check in new slot presentations
author
Drew Crampsie
<drewc@tech.coop>
Tue, 8 Nov 2005 11:52:15 +0000
(
03:52
-0800)
committer
Drew Crampsie
<drewc@tech.coop>
Tue, 8 Nov 2005 11:52:15 +0000
(
03:52
-0800)
darcs-hash:
20051108115215
-5417e-
600a23b955dad486a845e9a39048827ba917f397
.gz
src/slot-presentations.lisp
patch
|
blob
|
blame
|
history
diff --git
a/src/slot-presentations.lisp
b/src/slot-presentations.lisp
index
d7e874d
..
5270062
100644
(file)
--- a/
src/slot-presentations.lisp
+++ b/
src/slot-presentations.lisp
@@
-41,7
+41,9
@@
"")
:rows (rows slot)
:cols (columns slot))
- (maybe-convert-newline-and-escape-html-then-print))))
+ (when (presentation-slot-value slot instance)
+ (maybe-convert-newline-and-escape-html-then-print))
+ )))
(defcomponent mewa-slot-presentation ()