equal
deleted
inserted
replaced
84 privateIn:HGCommand |
84 privateIn:HGCommand |
85 ! |
85 ! |
86 |
86 |
87 HGCommand subclass:#remove |
87 HGCommand subclass:#remove |
88 instanceVariableNames:'paths' |
88 instanceVariableNames:'paths' |
|
89 classVariableNames:'' |
|
90 poolDictionaries:'' |
|
91 privateIn:HGCommand |
|
92 ! |
|
93 |
|
94 HGCommand subclass:#showconfig |
|
95 instanceVariableNames:'key' |
89 classVariableNames:'' |
96 classVariableNames:'' |
90 poolDictionaries:'' |
97 poolDictionaries:'' |
91 privateIn:HGCommand |
98 privateIn:HGCommand |
92 ! |
99 ! |
93 |
100 |
1110 ^ nil |
1117 ^ nil |
1111 |
1118 |
1112 "Modified: / 15-11-2012 / 00:38:52 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1119 "Modified: / 15-11-2012 / 00:38:52 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1113 ! ! |
1120 ! ! |
1114 |
1121 |
|
1122 !HGCommand::showconfig methodsFor:'accessing'! |
|
1123 |
|
1124 argumentsCommandOn:stream |
|
1125 "Called to get command specific options" |
|
1126 |
|
1127 key notNil ifTrue:[ |
|
1128 stream nextPut: key |
|
1129 ]. |
|
1130 |
|
1131 "Created: / 06-12-2012 / 15:53:09 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
1132 ! ! |
|
1133 |
1115 !HGCommand::status methodsFor:'accessing'! |
1134 !HGCommand::status methodsFor:'accessing'! |
1116 |
1135 |
1117 path |
1136 path |
1118 ^ path |
1137 ^ path |
1119 ! |
1138 ! |