summaryrefslogtreecommitdiff
path: root/save.pl
diff options
context:
space:
mode:
Diffstat (limited to 'save.pl')
-rw-r--r--save.pl5
1 files changed, 2 insertions, 3 deletions
diff --git a/save.pl b/save.pl
index 2e192b4..b06d2e4 100644
--- a/save.pl
+++ b/save.pl
@@ -84,12 +84,11 @@ commit(Msg) :-
write('creating process'), nl,
process_create(path(git), ['commit', '-m', Msg],
[process(PID)]),
- write(waiting), nl,
process_wait(PID, S),
- write(waited), nl,
commited(S).
-commited(1) :-
+commited(S) :-
+ dif(S, 0),
send(@display, report, error,
'Files could not be saved.').