equal
deleted
inserted
replaced
26 "{ Package: 'stx:libsvn' }" |
26 "{ Package: 'stx:libsvn' }" |
27 |
27 |
28 "{ NameSpace: SVN }" |
28 "{ NameSpace: SVN }" |
29 |
29 |
30 AbstractSettingsApplication subclass:#ConfigurationApp |
30 AbstractSettingsApplication subclass:#ConfigurationApp |
31 instanceVariableNames:'currentProfileHolder availableProfilesHolder svnConfigurations2 |
31 instanceVariableNames:'currentProfileHolder availableProfilesHolder svnConfigurations2 |
32 svnCurrentConfiguration configurationSelectedHolder |
32 svnCurrentConfiguration configurationSelectedHolder |
33 newConfigurationCount' |
33 newConfigurationCount' |
34 classVariableNames:'' |
34 classVariableNames:'' |
35 poolDictionaries:'' |
35 poolDictionaries:'' |
36 category:'SVN-UI-Configuration' |
36 category:'SVN-UI-Configuration' |
37 ! |
37 ! |
38 |
38 |
39 !ConfigurationApp class methodsFor:'documentation'! |
39 !ConfigurationApp class methodsFor:'documentation'! |
40 |
40 |
41 copyright |
41 copyright |
896 |
896 |
897 hasUnsavedChanges |
897 hasUnsavedChanges |
898 |
898 |
899 SVN::Configuration configurations asArray = svnConfigurations2 value asArray |
899 SVN::Configuration configurations asArray = svnConfigurations2 value asArray |
900 ifFalse:[^true]. |
900 ifFalse:[^true]. |
901 (self hasChangedAspectIn:self aspects asComparedTo:currentUserPrefs) |
901 ^ self |
902 ifTrue:[^true]. |
902 hasChangedAspectIn:self aspects |
903 ^ false |
903 asComparedTo:currentUserPrefs |
904 |
904 |
905 "Created: / 28-05-2008 / 07:33:26 / Jan Vrany <vranyj1@fel.cvut.cz>" |
905 "Created: / 28-05-2008 / 07:33:26 / Jan Vrany <vranyj1@fel.cvut.cz>" |
906 "Modified: / 19-08-2009 / 12:07:01 / Jan Vrany <vranyj1@fel.cvut.cz>" |
906 "Modified: / 19-08-2009 / 12:07:01 / Jan Vrany <vranyj1@fel.cvut.cz>" |
907 "Modified: / 19-08-2011 / 11:48:35 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
907 "Modified: / 19-08-2011 / 11:48:35 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
908 "Modified: / 25-11-2011 / 15:25:06 / cg" |
908 ! ! |
909 ! ! |
909 |
910 |
910 !ConfigurationApp class methodsFor:'documentation'! |
911 !ConfigurationApp class methodsFor:'documentation'! |
911 |
912 |
912 version |
913 version |