The Lambda Lab
/
projects
/
microbotany.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
8c6e2d8
)
Viewing directory now does updates.
author
Tim Vaughan
<plugd@thelambdalab.xyz>
Mon, 1 Jun 2020 16:53:24 +0000
(18:53 +0200)
committer
Tim Vaughan
<plugd@thelambdalab.xyz>
Mon, 1 Jun 2020 16:53:24 +0000
(18:53 +0200)
directory.gmi
patch
|
blob
|
history
diff --git
a/directory.gmi
b/directory.gmi
index
9c84035
..
fe7b2f8
100755
(executable)
--- a/
directory.gmi
+++ b/
directory.gmi
@@
-24,11
+24,13
@@
(print-rule total-width)
(for-each
(lambda (garden-file)
(print-rule total-width)
(for-each
(lambda (garden-file)
- (let* ((g (with-input-from-file garden-file read))
- (fields (list (garden-prop 'user g)
- (seconds->string (garden-prop 'created g))
- (garden-stage g))))
- (apply print (map pad-string fields colwidths))))
+ (let ((g (with-input-from-file garden-file read)))
+ (update-garden! g)
+ (with-output-to-file garden-file (lambda () write g))
+ (let ((fields (list (garden-prop 'user g)
+ (seconds->string (garden-prop 'created g))
+ (garden-stage g))))
+ (apply print (map pad-string fields colwidths)))))
(glob "accounts/*"))
(print-rule total-width))))
```
(glob "accounts/*"))
(print-rule total-width))))
```