diff options
| author | mryouse | 2022-07-09 02:39:27 +0000 |
|---|---|---|
| committer | mryouse | 2022-07-09 02:39:27 +0000 |
| commit | 4038aa87fddbe7e79c61603cf8d4514ebb47f3fe (patch) | |
| tree | 8f5493f5fb8d9f9ea1de4cd1ade03b7d6c9447d9 /neighborcat | |
| parent | 7ffeef0faef3fbc389069df853109afc76260f0d (diff) | |
| parent | 4fb8873f45c8596ba044c87060191778b8238952 (diff) | |
Merge branch 'master' into feature/listtypes
Diffstat (limited to 'neighborcat')
| -rw-r--r-- | neighborcat/neighborcat.neb | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/neighborcat/neighborcat.neb b/neighborcat/neighborcat.neb index 1c3b02a..5a2d5c2 100644 --- a/neighborcat/neighborcat.neb +++ b/neighborcat/neighborcat.neb @@ -75,9 +75,10 @@ ; go to the porch (def target-eats-stem (last (split target-eats "/"))) (def target-porch (user-from-path target-eats)) - (with-write (concat HOME target-porch PORCH NAME) - (write CAT _file_) - (write (concat "thank you for the " target-eats-stem "!\n") _file_))) + (def cat-file (open-write (concat HOME target-porch PORCH NAME))) + (write CAT cat-file) + (write (concat "thank you for the " target-eats-stem "!\n") cat-file) + (close cat-file)) (func init () ; create the new porch and bowl @@ -110,7 +111,7 @@ (block (print (concat "you already have " (first food) " in your bowl!")) (exit))) - (with-write (concat HOME USER BOWL "/" (first food))) + (close (open-write (concat HOME USER BOWL "/" (first food)))) (print (concat "you left some " (first food) " for " NAME "!"))) (func help () |