Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2004

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

Search the Archive

Re: printing all notebooks

  • To: mathgroup at smc.vnet.net
  • Subject: [mg45767] Re: printing all notebooks
  • From: bobhanlon at aol.com (Bob Hanlon)
  • Date: Sat, 24 Jan 2004 00:36:18 -0500 (EST)
  • References: <buqmrq$rcs$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Use $PathnameSeparator


Bob Hanlon

In article <buqmrq$rcs$1 at smc.vnet.net>, Murray Eisenberg
<murray at math.umass.edu> 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)?


  • 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