Use editor.

This commit is contained in:
Dominik Pantůček 2023-04-04 14:18:23 +02:00
parent 1e1422fc77
commit f1d3a0e318
2 changed files with 11 additions and 2 deletions

View file

@ -46,7 +46,8 @@ CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
members-dir
csv-simple
members-payments
web-static)
web-static
environment)
;; Print banner
(print "bbstool 0.9 (c) 2023 Brmlab, z.s.")
@ -121,6 +122,8 @@ CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
(-repl () "Start REPL with everything loaded"
(-needs-bank- #t)
(-action- 'repl))
(-edit () "Edit selected user"
(-action- 'edit))
)
;; Run tests
@ -228,6 +231,10 @@ CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
(repl))
((genweb)
(gen-web-static MB (-web-dir-)))
((edit)
(if mr
(edit-file (member-file-path mr))
(print "No member to edit.")))
(else
(print "Nothing to do."))