--- a/UnixDesktop.st Sat May 05 22:58:24 2012 +0100
+++ b/UnixDesktop.st Wed May 09 16:04:12 2012 +0100
@@ -75,6 +75,30 @@
"Created: / 11-08-2009 / 17:32:42 / Jan Vrany <vranyj1@fel.cvut.cz>"
! !
+!UnixDesktop methodsFor:'accessing-directories'!
+
+desktopDirectory
+ | dir |
+
+ dir := OperatingSystem getHomeDirectory.
+ ^(dir / 'Desktop') exists
+ ifTrue: [dir / 'Desktop']
+ ifFalse:[dir]
+
+ "Created: / 09-05-2012 / 11:50:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+documentsDirectory
+ | dir |
+
+ dir := OperatingSystem getHomeDirectory.
+ ^(dir / 'Documents') exists
+ ifTrue: [dir / 'Documents']
+ ifFalse:[dir]
+
+ "Created: / 09-05-2012 / 11:50:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
!UnixDesktop methodsFor:'operations'!
edit: filenames
@@ -125,9 +149,9 @@
!UnixDesktop class methodsFor:'documentation'!
version
- ^'$Id: UnixDesktop.st 10717 2011-10-11 15:53:59Z vranyj1 $'
+ ^'$Id: UnixDesktop.st 10808 2012-05-09 15:04:12Z vranyj1 $'
!
version_SVN
- ^ '$Id: UnixDesktop.st 10717 2011-10-11 15:53:59Z vranyj1 $'
+ ^ '$Id: UnixDesktop.st 10808 2012-05-09 15:04:12Z vranyj1 $'
! !