OSXOperatingSystem.st
changeset 16905 46653de3c189
parent 16677 0f22d24efe9f
child 17177 28ebbb908d3e
equal deleted inserted replaced
16904:838840a0be45 16905:46653de3c189
    66     "given a drive name, return the pathname to open it as a directory.
    66     "given a drive name, return the pathname to open it as a directory.
    67      For Windows, this is the driveName itself.
    67      For Windows, this is the driveName itself.
    68      For OSX, '/Volumes' is prepended.
    68      For OSX, '/Volumes' is prepended.
    69      Other OSs might prepent the pount point (i.e. /mnt/)"
    69      Other OSs might prepent the pount point (i.e. /mnt/)"
    70 
    70 
       
    71     driveName isNil ifTrue:[^ nil].
    71     driveName asFilename isAbsolute ifTrue:[^ driveName].
    72     driveName asFilename isAbsolute ifTrue:[^ driveName].
    72     ^ '/Volumes/',driveName
    73     ^ '/Volumes/',driveName
    73 ! !
    74 ! !
    74 
    75 
    75 !OSXOperatingSystem class methodsFor:'documentation'!
    76 !OSXOperatingSystem class methodsFor:'documentation'!
    76 
    77 
    77 version
    78 version
    78     ^ '$Header: /cvs/stx/stx/libbasic/OSXOperatingSystem.st,v 1.7 2014-07-03 14:36:15 cg Exp $'
    79     ^ '$Header: /cvs/stx/stx/libbasic/OSXOperatingSystem.st,v 1.8 2014-10-23 10:59:46 cg Exp $'
    79 !
    80 !
    80 
    81 
    81 version_CVS
    82 version_CVS
    82     ^ '$Header: /cvs/stx/stx/libbasic/OSXOperatingSystem.st,v 1.7 2014-07-03 14:36:15 cg Exp $'
    83     ^ '$Header: /cvs/stx/stx/libbasic/OSXOperatingSystem.st,v 1.8 2014-10-23 10:59:46 cg Exp $'
    83 ! !
    84 ! !
    84 
    85