summaryrefslogtreecommitdiff
path: root/save.pl
diff options
context:
space:
mode:
authorJohn Ankarström <john@ankarstrom.se>2022-01-22 18:25:52 +0100
committerJohn Ankarström <john@ankarstrom.se>2022-01-22 18:25:52 +0100
commit2f9d091f38edeb5562830313ca1c4443b6e02b58 (patch)
tree31cab0e233a71ee2a13574f6251a6345a5929a9c /save.pl
parent7628f46fe0b35eec8ae6d4045693ca3f9598819d (diff)
downloadsave-2f9d091f38edeb5562830313ca1c4443b6e02b58.tar.gz
M save.pl
M save.pl~
Diffstat (limited to 'save.pl')
-rw-r--r--save.pl4
1 files changed, 3 insertions, 1 deletions
diff --git a/save.pl b/save.pl
index 47121fe..72b8dc9 100644
--- a/save.pl
+++ b/save.pl
@@ -2,6 +2,8 @@
:- consult(library(pce)).
:- consult(library(process)).
+:- pce_global(@dialog, new(dialog('Save'))).
+
main :-
pce_main_loop(main).
@@ -19,7 +21,7 @@ Ensure Git is in PATH.').
added(0) :-
%send(@pce, load_defaults, 'Defaults'),
- new(D, dialog('Save')),
+ new(D, @dialog),
% File browser.
new(C, chain),