equal
deleted
inserted
replaced
4543 |
4543 |
4544 "Modified: / 25-07-2006 / 09:07:04 / cg" |
4544 "Modified: / 25-07-2006 / 09:07:04 / cg" |
4545 ! |
4545 ! |
4546 |
4546 |
4547 copyOrMoveDialog:aCollectionOfFiles for:aDestinationDirectory |
4547 copyOrMoveDialog:aCollectionOfFiles for:aDestinationDirectory |
4548 |size stream msg answer file| |
4548 |size msg answer file| |
4549 |
4549 |
4550 size := aCollectionOfFiles size. |
4550 size := aCollectionOfFiles size. |
4551 |
4551 |
4552 "/ stream := WriteStream on:'' asText. |
4552 "/ stream := WriteStream on:'' asText. |
4553 "/ stream nextPutAll:'Copy or move'; cr; cr; nextPutAll:'file'. |
4553 "/ stream nextPutAll:'Copy or move'; cr; cr; nextPutAll:'file'. |
7348 |
7348 |
7349 openDiffView |
7349 openDiffView |
7350 "open a diff-view" |
7350 "open a diff-view" |
7351 |
7351 |
7352 |name1 name2 text1 text2 d err nm l1 files title |
7352 |name1 name2 text1 text2 d err nm l1 files title |
7353 defaultName defaultDir lastFile sameContents msg| |
7353 defaultName defaultDir sameContents msg| |
7354 |
7354 |
7355 files := self currentSelectedObjects. |
7355 files := self currentSelectedObjects. |
7356 files isEmpty ifTrue:[ |
7356 files isEmpty ifTrue:[ |
7357 Dialog warn:(resources string:'You have to select a file first'). |
7357 Dialog warn:(resources string:'You have to select a file first'). |
7358 ^ self. |
7358 ^ self. |
9190 ! ! |
9190 ! ! |
9191 |
9191 |
9192 !AbstractFileBrowser class methodsFor:'documentation'! |
9192 !AbstractFileBrowser class methodsFor:'documentation'! |
9193 |
9193 |
9194 version |
9194 version |
9195 ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.523 2013-06-04 10:10:15 cg Exp $' |
9195 ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.524 2013-06-05 13:24:18 stefan Exp $' |
9196 ! |
9196 ! |
9197 |
9197 |
9198 version_CVS |
9198 version_CVS |
9199 ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.523 2013-06-04 10:10:15 cg Exp $' |
9199 ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.524 2013-06-05 13:24:18 stefan Exp $' |
9200 ! ! |
9200 ! ! |
9201 |
9201 |