Re: Changing Quark style sheets
Re: Changing Quark style sheets
- Subject: Re: Changing Quark style sheets
- From: Nan Mossey <email@hidden>
- Date: Wed, 22 Dec 2004 16:49:46 -0500
Title: Re: Changing Quark style sheets
You need to add “end if” after your if statements.
On 12/12/04 1:09 PM, "Dr Digby L. James" <email@hidden> wrote:
I'm trying to change the fonts of Quark style sheets. If I want to change them all to Bembo it works fine. But I want some to go to Bembo and some to Bembo SC.
The following doesn't work. Where am I going wrong?
tell application "QuarkXPress"
activate
tell front document
set stylelist to (get name of every style spec)
repeat with ListVar from 1 to length of stylelist
if font of item ListVar of stylelist is "New Baskerville" then set character attributes of style spec stylelist to {font:"Bembo"}
if font of character attributes of style spec stylelist is "NewBaskerville SC" then set character attributes of style spec stylelist to {font:"Bembo SC"}
end repeat
end tell
end tell
--
Nan Mossey
Times Union Publications Manager
1 News Plaza
Albany NY 12212
518-454-5704
========================================================
This e-mail message is intended only for the personal
use of the recipient(s) named above. If you are not
an intended recipient, you may not review, copy or
distribute this message.
If you have received this communication in error,
please notify the Albany Times Union Help Desk
(email@hidden) immediately by e-mail and
delete the original message.
========================================================
_______________________________________________
Do not post admin requests to the list. They will be ignored.
Applescript-users mailing list (email@hidden)
Help/Unsubscribe/Update your Subscription:
This email sent to email@hidden