Re: Applescript fot BBEit+TeXShop+pdfsync

Sorry, there was a little gap in the script - errors weren't caught as 
intended. Below is a modified version.

Claus

-- Applescript
-- The file has to be a TeXShop file, but can be opened, saved and 
edited in BBEdit.
-- pdflatex_special
-- Claus Gerhardt, Nov. 2004

(* The subroutine setnamebbedit returns baseName, texName, pdfName, 
namePath, dirName, dirNameunquoted, and saves the document of window 
texName.
*)
set previewer to "TeXShop"
--set previewer to "Acrobat  6.0.1 Professional"
--set previewer to "Preview"

if previewer is equal to "Acrobat  6.0.1 Professional" then
        set process_name to "acrobat"
else
        set process_name to previewer
end if

tell application "BBEdit"
        get file of window 1
        set filepath to result
        set fileName to POSIX path of filepath as string
        
        
        
	set scriptPath to (do shell script "dirname " & 
"~/Library/TeXShop/Scripts/ex")
        set scriptPath to scriptPath & "/setnamebbedit.scpt"
        set scriptName to POSIX file scriptPath as alias
        set scriptLiB to (load script scriptName)
        tell scriptLiB
		set {baseName, texName, pdfName, namePath, dirName, dirNameunquoted, 
logName, logPath, rtfName} to setnamebbedit(fileName)
        end tell
        select document texName
        set sourceLine to startLine of selection as number
        set texPath to namePath & ".tex"
        set texFile to texPath as POSIX file
        try
                set shellScript to "cd " & dirName & ";"
		set shellScript to shellScript & "~/Library/TeXShop/bin/pdflatexc  " 
& texName
                do shell script shellScript
        end try
        
        set logFile to logPath as POSIX file
        
        set findString to "Emergency stop"
        
        set findString to "'Emergency stop'"
        set foundText to "no error"
        try
                set shellScript to "cd " & dirName & ";"
		set shellScript to "/usr/bin/egrep -w -n  " & findString & " " & 
logPath
                do shell script shellScript
                
                set foundText to result as string
                set n to (number of characters of contents of foundText)
                set i to 1 as number
                
                repeat while i < (n + 1)
                        if character i of foundText is equal to ":" then
                                set k to i
                                exit repeat
                        else
                                set i to (i + 1)
                        end if
                end repeat
                set lineNumber to (characters 1 thru (k - 1) of foundText as 
string)
                set theLine to lineNumber as number
        end try
        
        if foundText is equal to "no error" then
                set thePDF to POSIX file pdfName as alias
		set scriptPath to (do shell script "dirname " & 
"~/Library/TeXShop/Scripts/ex")
                set scriptPath to scriptPath & "/preview_bbedit.scpt"
                set scriptName to POSIX file scriptPath as alias
                set scriptLiB to (load script scriptName)
                tell scriptLiB
                        preview_bbedit(texName, thePDF, previewer, process_name)
                end tell
                tell application "TeXShop"
                        activate
                        open texFile
                        tell front document of application "TeXShop"
                                refreshtext
                        end tell
                        typeset front document
                end tell
                tell front document of application "TeXShop"
                        refreshtext
                        goto line sourceLine
                end tell
        else
                beep
                do shell script "bbedit " & "+" & theLine & " " & logPath
        end if
end tell


--------------------- 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 Post: <mailto:MacOSX-TeX-yNUTs0qEFpZ/1wmUHrjjoYdd74u8MsAO@xxxxxxxxxxxxxxxx>