Getting File Directory Using Any Platform
- To: mathgroup at smc.vnet.net
- Subject: [mg34013] Getting File Directory Using Any Platform
- From: "Ersek, Ted R" <ErsekTR at navair.navy.mil>
- Date: Fri, 26 Apr 2002 03:27:42 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
I want a line of code that will return the directory where the Notation
package is located and it should return a result consistent with the
operating system used. If the following doesn't work on your platform
please let me know. I am also interested in any improvements to this code.
In[1]:=
dirs=Which[
$System==="Microsoft Windows","\\AddOns\\ExtraPackages\\Utilities",
$System==="Machintosh",":AddOns:ExtraPackages:Utilities",
True (* Unix *), "/AddOns/ExtraPackages/Utilities"
];
DirectoryName[$TopDirectory<>dirs<>"Notation.m"]
Out[1]=
C:\Program Files\Wolfram Research\Mathematica\4.1\AddOns\ExtraPackages\
------------
Thanks,
Ted Ersek
Get Mathematica tips, tricks from
http://www.verbeia.com/mathematica/tips/Tricks.html