[OS X TeX] TeXShop wish list

Claus Gerhardt gerhardt at math.uni-heidelberg.de
Mon Sep 4 13:50:24 CEST 2006


I assume your using an old beta. The current beta is 2.10beta2. For  
me the script works fine.

Claus


On Sep 4, 2006, at 13:07, Paul Smyth wrote:

> Thanks Claus,
>
> I added this as a Macro and I can run it but I'm getting errors. In  
> the current version of TeXShop I get
>
> TeXShop got an error:
> NSReceiverEvaluationScriptError: 4
>
> Same in the current beta.
>
> Note: I have not modified the script in any way.
>
> Paul
>
> On 4 Sep 2006, at 11:24, Claus Gerhardt wrote:
>
>> The Applescript below closes the frontmost tex file and removes  
>> the corresponding .aux files. You can add any other filename.xxx  
>> to be removed by looking at the structure of the script.
>>
>> Save the script as a Macro to be called by a short key.
>>
>> Claus
>>
>> --AppleScript
>> -- Apply only to an already saved file
>> -- Claus Gerhardt, September 2006
>> (*This script provides the filename and its various derivatives of  
>> the frontmost (tex) document in TeXShop.*)
>>
>>
>>
>> tell application "TeXShop"
>> 	get path of document of window 1
>> 	set fileName to result
>> end tell
>>
>> set {baseName, texName, pdfName, namePath, dirName,  
>> dirNameunquoted, logName, logPath, rtfName} to setnamets(fileName)
>>
>> tell application "TeXShop"
>> 	close document texName
>> end tell
>>
>> set shellScript to "cd " & dirName & ";"
>> set shellScript to shellScript & "rm -f  " & baseName & ".aux"
>> do shell script shellScript
>>
>> on setnamets(x)
>> 	set n to (number of characters of contents of x)
>> 	set fileNamequoted to quoted form of x
>> 	set windowName to do shell script "basename " & fileNamequoted
>> 	set m to (number of characters of contents of windowName)
>> 	set dirName to quoted form of (characters 1 thru (n - m - 1) of x  
>> as string)
>> 	set dirNameunquoted to (characters 1 thru (n - m - 1) of x as  
>> string)
>> 	set theText to contents of windowName as string
>> 	
>> 	set n to (number of characters of contents of theText)
>> 	set i to n as number
>> 	
>> 	repeat while i > 0
>> 		if character i of theText is equal to "." then
>> 			set m to i
>> 			exit repeat
>> 		else
>> 			set i to (i - 1)
>> 		end if
>> 	end repeat
>> 	
>> 	set baseName to (characters 1 thru (m - 1) of theText as string)
>> 	set texName to baseName & ".tex"
>> 	set namePath to dirNameunquoted & "/" & baseName as string
>> 	set pdfName to namePath & ".pdf" as string
>> 	set rtfName to namePath & ".rtf" as string
>> 	set logPath to namePath & ".log" as string
>> 	set logName to baseName & ".log" as string
>> 	
>> 	try
>> 		tell application "TeXShop"
>> 			save document texName
>> 		end tell
>> 	end try
>> 	return {baseName, texName, pdfName, namePath, dirName,  
>> dirNameunquoted, logName, logPath, rtfName} as list
>> end setnamets
>>
>> On Sep 4, 2006, at 5:30, Jan Rosinski wrote:
>>
>>> The following option in TeXShop Preferences would be useful to me  
>>> and maybe other people will find it useful as well. I would like  
>>> to have, as an option to select,  'Trash Aux Files when closing a  
>>> document'. This option, when checked, would reduce the clutter in  
>>> my TeX folders automatically and without any problem since  
>>> creating new aux files is very quick. If you do not want it, you  
>>> can always uncheck it.
>>>
>>> Jan Rosinski
>>> ------------------------- Info --------------------------
>>> Mac-TeX Website: http://www.esm.psu.edu/mac-tex/
>>>          & FAQ: http://latex.yauh.de/faq/
>>> TeX FAQ: http://www.tex.ac.uk/faq
>>> List Archive: http://tug.org/pipermail/macostex-archives/
>>>
>>
>> ------------------------- Info --------------------------
>> Mac-TeX Website: http://www.esm.psu.edu/mac-tex/
>>          & FAQ: http://latex.yauh.de/faq/
>> TeX FAQ: http://www.tex.ac.uk/faq
>> List Archive: http://tug.org/pipermail/macostex-archives/
>>
>
> ------------------------- Info --------------------------
> Mac-TeX Website: http://www.esm.psu.edu/mac-tex/
>          & FAQ: http://latex.yauh.de/faq/
> TeX FAQ: http://www.tex.ac.uk/faq
> List Archive: http://tug.org/pipermail/macostex-archives/
>

------------------------- Info --------------------------
Mac-TeX Website: http://www.esm.psu.edu/mac-tex/
          & FAQ: http://latex.yauh.de/faq/
TeX FAQ: http://www.tex.ac.uk/faq
List Archive: http://tug.org/pipermail/macostex-archives/




More information about the macostex-archives mailing list