🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: adobe.scripting.indesign
Article #20728

Re: Bullet script

#20728
From: Shane Stanley
Date: Wed, 12 Jun 2002 22:25
30 lines
1635 bytes
in article ef914f2.-1@WebX.aaQKaf7vad4, pjredman wrote:

> Back in April there was some discussion of a script for adding bullets to
> specific paragraph styles. Was that script ever posted?

I'm not sure, but something like this should get you started:

tell application "InDesign 2.0.1"
 set find preferences to nothing
 set change preferences to nothing
 tell document 1
  set theStyle to paragraph style "Bullets"
  set thePars to search with find attributes {applied paragraph
style:theStyle}
  
  try -- trap for no finds
   thePars
  on error
   set thePars to {}
  end try
  
  repeat with i from (count of thePars) to 1 by -1
   set contents of insertion point 1 of item i of thePars to "� "
  end repeat
 end tell
 set find preferences to nothing
end tell

-- 
Shane Stanley,  sstanley@myriad-com.com.au
Technical Details
Message-ID: <B92E078E.32C81%sstanley@myriad-com.com.au>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-08!supernews.com!iad-peer.news.verio.net!news.verio.net!news.maxwell.syr.edu!eusc.inter.net!newsfeed01.sul.t-online.de!t-online.de!WebX
References: <ef914f2.-1@WebX.aaQKaf7vad4>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII
X-Google-Thread: f939a,d395462a0248ea1b
X-Google-Attributes: gidf939a,public
X-Google-ArrivalTime: 2002-06-12 15:37:42 PST
From: Shane Stanley <sstanley@myriad-com.com.au>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-08!supernews.com!iad-peer.news.verio.net!news.verio.net!news.maxwell.syr.edu!eusc.inter.net!newsfeed01.sul.t-online.de!t-online.de!WebX
Newsgroups: adobe.scripting.indesign
Subject: Re: Bullet script
Message-ID: <B92E078E.32C81%sstanley@myriad-com.com.au>
Date: Wed, 12 Jun 2002 15:25:51 -0700
References: <ef914f2.-1@WebX.aaQKaf7vad4>
Lines: 32
User-Agent: Microsoft-Outlook-Express-Macintosh-Edition/5.0.3
MIME-Version: 1.0
Content-Type: text/plain; charset="ISO-8859-1"
Content-Transfer-Encoding: 8bit