From 2aa2b1844de2cb44d59f1043b4c5410b70b7ab94 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Nicol=C3=A1s=20Passerini?= Date: Fri, 21 Oct 2016 16:09:01 +0200 Subject: [PATCH] Fixes #190 --- .../IceCommitModelNew.class/class/settingsOn..st | 8 ++++++++ .../class/uploadChangesOnCommit..st | 3 +++ .../class/uploadChangesOnCommit.st | 3 +++ .../IceCommitModelNew.class/instance/initializeWidgets.st | 1 + Iceberg.package/IceCommitModelNew.class/properties.json | 2 +- 5 files changed, 16 insertions(+), 1 deletion(-) create mode 100644 Iceberg.package/IceCommitModelNew.class/class/settingsOn..st create mode 100644 Iceberg.package/IceCommitModelNew.class/class/uploadChangesOnCommit..st create mode 100644 Iceberg.package/IceCommitModelNew.class/class/uploadChangesOnCommit.st diff --git a/Iceberg.package/IceCommitModelNew.class/class/settingsOn..st b/Iceberg.package/IceCommitModelNew.class/class/settingsOn..st new file mode 100644 index 0000000000..c444d8a99c --- /dev/null +++ b/Iceberg.package/IceCommitModelNew.class/class/settingsOn..st @@ -0,0 +1,8 @@ +settings +settingsOn: aBuilder + + (aBuilder setting: #'uploadChangesOnCommit') + parent: #Iceberg; + target: self; + label: 'Upload changes on commit'; + description: 'If selected your code will be uploaded by default on each commit (if possible)' diff --git a/Iceberg.package/IceCommitModelNew.class/class/uploadChangesOnCommit..st b/Iceberg.package/IceCommitModelNew.class/class/uploadChangesOnCommit..st new file mode 100644 index 0000000000..0a577cf379 --- /dev/null +++ b/Iceberg.package/IceCommitModelNew.class/class/uploadChangesOnCommit..st @@ -0,0 +1,3 @@ +accessing +uploadChangesOnCommit: anObject + UploadChangesOnCommit := anObject \ No newline at end of file diff --git a/Iceberg.package/IceCommitModelNew.class/class/uploadChangesOnCommit.st b/Iceberg.package/IceCommitModelNew.class/class/uploadChangesOnCommit.st new file mode 100644 index 0000000000..439e3c8437 --- /dev/null +++ b/Iceberg.package/IceCommitModelNew.class/class/uploadChangesOnCommit.st @@ -0,0 +1,3 @@ +accessing +uploadChangesOnCommit + ^ UploadChangesOnCommit ifNil: [ UploadChangesOnCommit := true ] \ No newline at end of file diff --git a/Iceberg.package/IceCommitModelNew.class/instance/initializeWidgets.st b/Iceberg.package/IceCommitModelNew.class/instance/initializeWidgets.st index 2404780adc..b9bb92fd66 100644 --- a/Iceberg.package/IceCommitModelNew.class/instance/initializeWidgets.st +++ b/Iceberg.package/IceCommitModelNew.class/instance/initializeWidgets.st @@ -7,6 +7,7 @@ initializeWidgets pushCheckbox := self newCheckBox label: 'Upload changes on commit?'; + state: self class uploadChangesOnCommit; yourself. self focusOrder diff --git a/Iceberg.package/IceCommitModelNew.class/properties.json b/Iceberg.package/IceCommitModelNew.class/properties.json index 1c461722a9..5a0b4cff52 100644 --- a/Iceberg.package/IceCommitModelNew.class/properties.json +++ b/Iceberg.package/IceCommitModelNew.class/properties.json @@ -4,7 +4,7 @@ ], "classtraitcomposition" : "TIceTool classTrait", "classvars" : [ - ], + "UploadChangesOnCommit" ], "commentStamp" : "NicoPasserini 8/25/2016 14:47", "instvars" : [ "message",