ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/electrostaticMethodsPaper/reload_preview.scpt
Revision: 2621
Committed: Wed Mar 15 14:24:12 2006 UTC (18 years, 3 months ago) by chrisfen
File size: 2906 byte(s)
Log Message:
makefile should reload the preview window now (added an applescript)

File Contents

# Content
1 FasdUAS 1.101.10 k l 
2 Reload Preview Document 1.0
3 By Trevor Harmon <trevor@vocaro.com>
4
5 Based in part on the "Checking Accessibility Status" script by Apple.
6 http://www.apple.com/applescript/uiscripting/01.html
7  l 
8
9 i I 0reload_document o 0doc k? l l A; Make sure the document in question is the frontmost window I
10 .sysoexecTEXTTEXT b m  open  o 0doc l l   Now close it!" !O5#$ #O 4%& %O3'( 'O2)* )O!1+, +I(0-
11 .prcsclicuieluiel -4(,.
12 
13 menI .m*+/ / Close ,4!%0
14 
15 menE 0m#$ *41
16 
17 mbri 1m2 2
18 File (43
19 
20 mbar 3m &4 4
21 
22 prcs 4m5 5 Preview $m 66null߀ System Events.app߀^p~0()( נsevsalis PeregrineH+ System Events.appkc CoreServicesYc 7Peregrine:System:Library:CoreServices:System Events.app$System Events.app Peregrine-System/Library/CoreServices/System Events.app/"78 7l6689: 9l66; ; And finally reopen it:<= <I6=>
23 .sysoexecTEXTTEXT >b69?@ ?m67A A open  @o78 0doc=B Bl>> CD ClDEF EiGH GII
24 .aevtoappnull**** Io 0argv Hn JK JI L 0reload_documentLM MnNO N4P
25 
26 cobj Pm Oo 0argv KfFQ QlRSTR 0reload_document
27 .aevtoappnull****S UV 0reload_documentWW 0docU 0docV 652/A
28 .sysoexecTEXTTEXT
29 
30 prcs
31 
32 mbar
33 
34 mbri
35 
36 menE
37 
38 menI
39 .prcsclicuieluiel@%j O**/"*k/*/*k/
40 */j UUUUUO%j OPTHXY
41 .aevtoappnull**** 0argvX 0argvY
42 
43 cobj 0reload_document
44 )k/k+ascr ޭ