MathGroup Archive 2004

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: printing all notebooks


Murray Eisenberg wrote:
> Using Mathematica under Windows, the function printDirectoryNotebooks 
> defined below prints all the Mathematica notebooks in a user-specified 
> directory.  For example:
> 
>    printDirectoryNotebooks["e:\\Temp"]
> 
> But it does not work using Mac OS-X.  Can you indicate how it should be 
> changed so it will be platform-independent?
> 
>    printNotebook[nbname_] :=
>      Module[{nb = NotebookOpen[nbname]},
>        NotebookPrint[nb]; NotebookClose[nb]; nbname]
> 
>    printDirectoryNotebooks[dirName_?StringQ] :=
>      Module[{dir = SetDirectory[dirName]},
>        printNotebook[dir <> "/" <> #] & /@ FileNames["*.nb"]]
> 
> In particular -- and I believe this is part of the problem -- how from 
> within Mathematica can one determine the path-separator character 
> directly (without, say, querying $System and then accordingly select the 
> path-separator character)?
> 

??$PathnameSeparator

-- 

Roland Franzius


  • Prev by Date: Re: printing all notebooks
  • Next by Date: Equation counting in arXiv style sheet
  • Previous by thread: Re: printing all notebooks
  • Next by thread: Re: printing all notebooks