<html><head></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; ">Thank you.<br><div>
<span class="Apple-style-span" style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-align: auto; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0; "><span class="Apple-style-span" style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0px; "><div style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><div><br class="Apple-interchange-newline">--</div><div>M. Tamer Özsu</div><div>University of Waterloo</div></div></span></span>
</div>
<br><div><div>On 2010-06-14, at 7:23 PM, Ramón Figueroa-Centeno wrote:</div><br class="Apple-interchange-newline"><blockquote type="cite">
<title>Re: ANN: ChkTeX for TeXShop 1.4</title>
<font face="Verdana, Helvetica, Arial"><span style="font-size:18pt">Here you go.<br>
<br>
--Applescript direct<br>
<br>
-- Ramon Figueroa-Centeno (June 3, 2010)<br>
-- <a href="http://www2.hawaii.edu/~ramonf" target="_top" rel="nofollow" link="external">http://www2.hawaii.edu/~ramonf</a><br>
<br>
try<br>
tell application "System Events"<br>
if UI elements enabled then<br>
tell process "ChkTeX for TeXShop"<br>
set window_pos to the position of window "ChkTeX for TeXShop"<br>
set window_size to the size of window "ChkTeX for TeXShop"<br>
end tell<br>
end if<br>
end tell<br>
on error<br>
try<br>
try<br>
set oldDelims to AppleScript's text item delimiters -- save their current state<br>
set AppleScript's text item delimiters to {" "} -- declare new delimiters<br>
<br>
set command to "defaults read TeXShop \"NSWindow Frame PdfKitWindow\" | sed 's/ +/ /g'"<br>
tell me to set ventana to do shell script command<br>
tell ventana<br>
set window_pos to {text item 1, 0}<br>
if text item 3 > 600 then<br>
set window_size to {600, (text item 4 as integer)}<br>
else<br>
set window_size to {text item 3, (text item 4 as integer)}<br>
end if<br>
end tell<br>
set AppleScript's text item delimiters to oldDelims -- restore them<br>
on error<br>
set AppleScript's text item delimiters to oldDelims -- restore them in case something went wrong<br>
end try<br>
on error<br>
set window_pos to {640, 0}<br>
set window_size to {600, 640}<br>
end try<br>
end try<br>
<br>
tell application "ChkTeX for TeXShop" to quit<br>
<br>
-- Force Quit a given application using applescript?<br>
-- <a href="http://macscripter.net/viewtopic.php?id=15240" target="_top" rel="nofollow" link="external">http://macscripter.net/viewtopic.php?id=15240</a><br>
set myProcesses to {"TeXShop Webpage Helper", "ChkTeX for TeXShop"} -- The ones to quit.<br>
<br>
tell application "System Events"<br>
repeat with myProcess in myProcesses<br>
set theID to (unix id of processes whose name is myProcess)<br>
try<br>
-- Should stop the application with no dialogs and no items saved.<br>
do shell script "kill -9 " & theID<br>
end try<br>
end repeat<br>
end tell<br>
<br>
tell application "TeXShop"<br>
activate<br>
try<br>
path of the front document<br>
set TeX_path to the result<br>
on error<br>
-- There is no front document or it has not ever been saved<br>
beep<br>
display dialog "there is no front document" & return & "or it has not ever been saved!" buttons {"Ok"} default button "Ok" with icon stop giving up after 20<br>
return<br>
end try<br>
<br>
if the front document is modified then<br>
set saveme to 1<br>
else<br>
set saveme to 0<br>
end if<br>
<br>
set command to "open -a \"ChkTeX for TeXShop\" " & quoted form of TeX_path<br>
if saveme = 1 then<br>
set command to command & " --args " & saveme & " " & quoted form of (name of the front document as string)<br>
end if<br>
do shell script command<br>
end tell<br>
<br>
activate application "ChkTeX for TeXShop"<br>
tell application "System Events"<br>
if UI elements enabled then<br>
tell process "ChkTeX for TeXShop"<br>
set position of window "ChkTeX for TeXShop" to window_pos<br>
set size of window "ChkTeX for TeXShop" to window_size<br>
end tell<br>
end if<br>
end tell<br>
</span></font>
<br><hr align="left" width="300">
View this message in context: <a href="http://macosx-tex.576846.n2.nabble.com/ANN-ChkTeX-for-TeXShop-1-4-tp5176033p5179765.html">Re: ANN: ChkTeX for TeXShop 1.4</a><br>
Sent from the <a href="http://macosx-tex.576846.n2.nabble.com/">MacOSX-TeX mailing list archive</a> at <a href="http://Nabble.com">Nabble.com</a>.<br>
----------- Please Consult the Following Before Posting -----------<br>TeX FAQ: <a href="http://www.tex.ac.uk/faq">http://www.tex.ac.uk/faq</a><br>List Reminders and Etiquette: <a href="http://email.esm.psu.edu/mac-tex/">http://email.esm.psu.edu/mac-tex/</a><br>List Archive: <a href="http://tug.org/pipermail/macostex-archives/">http://tug.org/pipermail/macostex-archives/</a><br>TeX on Mac OS X Website: <a href="http://mactex-wiki.tug.org/">http://mactex-wiki.tug.org/</a><br>List Info: <a href="http://email.esm.psu.edu/mailman/listinfo/macosx-tex">http://email.esm.psu.edu/mailman/listinfo/macosx-tex</a><br><br></blockquote></div><br></body></html>