diff options
author | Eduardo Julian | 2020-10-31 20:26:37 -0400 |
---|---|---|
committer | Eduardo Julian | 2020-10-31 20:26:37 -0400 |
commit | 69272f598d831e89da83bdc8c9290d5607dfb14d (patch) | |
tree | 4915f241708344209d4c35ccdc8b8e57bab68e4c /stdlib/source/program/aedifex/shell.lux | |
parent | eea741e9b4a47ae09832311d6d61f0bd6024f673 (diff) |
Re-named the directory for my bookmarks to better reflect what they are.
Diffstat (limited to 'stdlib/source/program/aedifex/shell.lux')
-rw-r--r-- | stdlib/source/program/aedifex/shell.lux | 19 |
1 files changed, 9 insertions, 10 deletions
diff --git a/stdlib/source/program/aedifex/shell.lux b/stdlib/source/program/aedifex/shell.lux index 5ef30cf91..0215c08da 100644 --- a/stdlib/source/program/aedifex/shell.lux +++ b/stdlib/source/program/aedifex/shell.lux @@ -44,17 +44,16 @@ (#static getRuntime [] #io java/lang/Runtime) (exec [java/lang/String #? [java/lang/String] java/io/File] #io #try java/lang/Process)) -(exception: #export (failure-to-execute-command {working-directory Text} {command Text} {error Text}) - (exception.report - ["Working Directory" (%.text working-directory)] - ["Command" (%.text command)] - ["Error" (%.text error)])) +(template [<exception>] + [(exception: #export (<exception> {working-directory Text} {command Text} {error Text}) + (exception.report + ["Working directory" (%.text working-directory)] + ["Command" (%.text command)] + ["Error" (%.text error)]))] -(exception: #export (failure-during-command-execution {working-directory Text} {command Text} {error Text}) - (exception.report - ["Working Directory" (%.text working-directory)] - ["Command" (%.text command)] - ["Error" (%.text error)])) + [failure-to-execute-command] + [failure-during-command-execution] + ) (exception: #export (abnormal-exit {working-directory Text} {command Text} {code Int}) (exception.report |