Current File : //usr/share/texlive/texmf-dist/doc/generic/pstricks/ctandir.sty

%% LaTeX2e file `ctandir.sty'
%% generated by the `filecontents' environment
%% from source `pst-fill-doc' on 2004/08/18.
%%
%% LaTeX2e file `ctandir.sty'
%% generated by the `filecontents' environment
%% from source `ltubguid' on 1997/06/12.
%%
%
% Experimental CTAN location information macros for use with Donald
% Arseneau's |url.sty|
%
% we need url.sty; we can rely on it to demand anything it needs of
% LaTeX
\IfFileExists{url.sty}%
  {\RequirePackage{url}}%
  {\PackageWarning{ctandir}{You should acquire a copy of url.sty}%
   \newcommand\urldef[3]{\def#1{\texttt{#3}}}%
   \let\url\texttt
  }
%
\newcommand\CTANdirectory[1]{\expandafter\urldef
  \csname CTAN@#1\endcsname\path}
\newcommand\CTANfile[1]{\expandafter\urldef
  \csname CTAN@#1\endcsname\path}
%
% Use the standard label-referencing mechanism to get the warning for
% an undefined label
\newcommand\CTANref[1]{\expandafter\@setref\csname CTAN@#1\endcsname
  \relax{#1}}