fixed a bug that added the 'add' command to a list

main
m455 2019-03-12 21:59:56 -04:00
parent db79a736a2
commit 7ebf92132e
1 changed files with 2 additions and 1 deletions

View File

@ -117,7 +117,8 @@
(if (and
(check-for-directory)
(check-for-file))
(add-item-to-file (string:string-join (vector->list args)))
;; The cdr here removes the command string "add" from being added to the file
(add-item-to-file (string:string-join (cdr (vector->list args))))
(begin
(display-hash-ref messages:messages 'file-not-found)
(display-hash-ref messages:messages 'try-init))))