I'd like to write a file into another file, only if it's not empty.
this snippet is ugly, and out of context, but should give you an idea...
Code: Select all
(if (not (empty? (read-file (append notespath note)))
(write-file (append notespath stamped-name) (read-file (append notespath note)))))