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 (if (and
(check-for-directory) (check-for-directory)
(check-for-file)) (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 (begin
(display-hash-ref messages:messages 'file-not-found) (display-hash-ref messages:messages 'file-not-found)
(display-hash-ref messages:messages 'try-init)))) (display-hash-ref messages:messages 'try-init))))