Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Sat, 28 Dec 2002 15:53:20 +0100
changeset 4411 1de753dffcc2
parent 4410 b1972ecceb2a
child 4412 710b2097c588
*** empty log message ***
FileOperation.st file | annotate | diff | comparison | revisions 
--- a/FileOperation.st	Sat Dec 28 15:52:20 2002 +0100
+++ b/FileOperation.st	Sat Dec 28 15:53:20 2002 +0100
@@ -205,7 +205,7 @@
 !FileOperation::Copy class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.14 2002-12-21 14:51:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.15 2002-12-28 14:53:20 cg Exp $'
 ! !
 
 !FileOperation::Copy methodsFor:'accessing'!
@@ -409,7 +409,7 @@
 !FileOperation::Create class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.14 2002-12-21 14:51:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.15 2002-12-28 14:53:20 cg Exp $'
 ! !
 
 !FileOperation::Create methodsFor:'accessing'!
@@ -645,7 +645,7 @@
 !FileOperation::Delete class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.14 2002-12-21 14:51:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.15 2002-12-28 14:53:20 cg Exp $'
 ! !
 
 !FileOperation::Delete methodsFor:'actions'!
@@ -662,8 +662,9 @@
 
             Error handle:[:ex|
                 "was not able to remove it"
-                Smalltalk beep.
-                self errorString:((ex description, '\', ex signal notifierString) withCRs).
+                Dialog warn:(ex description, '\', ex signal notifierString) withCRs.
+"/                Smalltalk beep.
+                self errorString:((ex description, ' - ', ex signal notifierString) withCRs).
                 result := false.
                 ^ self.
             ] do:[
@@ -805,7 +806,7 @@
 !FileOperation::Move class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.14 2002-12-21 14:51:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.15 2002-12-28 14:53:20 cg Exp $'
 ! !
 
 !FileOperation::Move methodsFor:'accessing'!
@@ -974,7 +975,7 @@
 !FileOperation::Rename class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.14 2002-12-21 14:51:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.15 2002-12-28 14:53:20 cg Exp $'
 ! !
 
 !FileOperation::Rename methodsFor:'accessing'!
@@ -1059,5 +1060,5 @@
 !FileOperation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.14 2002-12-21 14:51:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.15 2002-12-28 14:53:20 cg Exp $'
 ! !
hg/stx-libtool