diff options
| -rw-r--r-- | save.exe | bin | 278441 -> 278500 bytes | |||
| -rw-r--r-- | save.pl | 11 | ||||
| -rw-r--r-- | save.pl~ | 5 |
3 files changed, 11 insertions, 5 deletions
| Binary files differ @@ -2,6 +2,9 @@ :- consult(library(pce)). :- consult(library(process)). +:- op(920,fy, *). +*_. + :- pce_begin_class(save_dialog, dialog). unlink(D) :-> @@ -41,7 +44,7 @@ added(0) :- % Right side. send(@file_browser, right, @dialog), - send(@commit_browser, right, @dialog), + *send(@commit_browser, right, @dialog), refresh, % Left side. @@ -57,9 +60,9 @@ refresh :- send(@files, clear), status(@files), send(@file_browser, members(@files)), - send(@commits, clear), - log(@commits), - send(@commit_browser, members(@commits)). + *send(@commits, clear), + *log(@commits), + *send(@commit_browser, members(@commits)). status(C) :- setup_call_cleanup( @@ -2,6 +2,9 @@ :- consult(library(pce)). :- consult(library(process)). +:- op(920,fy, *). +*_. + :- pce_begin_class(save_dialog, dialog). unlink(D) :-> @@ -70,7 +73,7 @@ status(C) :- log(C) :- setup_call_cleanup( - process_create(path(git), ['log', '--format=format:%ai'], + process_create(path(git), ['log', '--format=format:%ai %s'], [stdout(pipe(Out))]), read_to_chain(Out, C), close(Out)). |