equal
deleted
inserted
replaced
1130 newEntryValue := files first. |
1130 newEntryValue := files first. |
1131 ] ifFalse:[ |
1131 ] ifFalse:[ |
1132 newEntryValue := self getCommonForCurrentFiles. |
1132 newEntryValue := self getCommonForCurrentFiles. |
1133 ]. |
1133 ]. |
1134 ]. |
1134 ]. |
1135 self fileEntryFieldHolder value:newEntryValue withoutNotifying:self. |
1135 self fileEntryFieldHolder value:(newEntryValue asString) withoutNotifying:self. |
1136 |
1136 |
1137 self updatePreview. |
1137 self updatePreview. |
1138 ! |
1138 ! |
1139 |
1139 |
1140 fileEntryFieldHolderChanged |
1140 fileEntryFieldHolderChanged |
1508 ! ! |
1508 ! ! |
1509 |
1509 |
1510 !FileBrowserV2 class methodsFor:'documentation'! |
1510 !FileBrowserV2 class methodsFor:'documentation'! |
1511 |
1511 |
1512 version |
1512 version |
1513 ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.58 2002-12-13 16:29:27 penk Exp $' |
1513 ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.59 2002-12-18 10:27:50 penk Exp $' |
1514 ! ! |
1514 ! ! |
1515 |
1515 |
1516 FileBrowserV2 initialize! |
1516 FileBrowserV2 initialize! |