TweetFollow Us on Twitter

Jan 99 Tips

Volume Number: 15 (1999)
Issue Number: 1
Column Tag: Tips & Tidbits

Jan 99 Tips

by Jeff Clites <online@mactech.com>

Autocompletion in MPW

One very useful feature of many Unix shells is that you only need to type the beginning of a command, hit tab, and it fills in the complete command. I was really missing this on MPW, especially with long command names such as UnobsoleteNameRevisions.

So here's a script that attempts to provide this feature in MPW, as well as possible. Bind it to Command-Tab (or whatever you want), then type "nam", hit Command-Tab, and watch it fill in "NameRevisions" for you.

Note: if nothing is selected, it will try to complete the last word on the current line. If you want to complete a word in the middle of a line, you'll have to select it.

If ":" is in your {Commands} variable, it will also consider all files in the current directory, as I have found no way to figure out whether a file is an MPW script or not. Actually, this may even be useful.

# get the current selection
Set CurrentSelection "'Catenate "{Active}".§'"

If "{CurrentSelection}" == ""
   # select the entire line we're on
   Find !0 "{Active}"
   # put the insertion point at the beginning of this line
   Find Δ§:Δ§ "{Active}"
   # remember line number, so we can restore it later
   Set CurrentLine 'Position -l "{Active}"'

   # select the last word on this line
   Find /[¬ ∂t∂n]+[ ∂t]*∞/ "{Active}" || (Beep; Exit 0)

   # if it isn't really on our current line, exit
   If 'Position -l "{Active}"' != {CurrentLine}
      Find {CurrentLine} "{Active}"
      Beep
      Exit 0
   End

   Set CurrentSelection "'Catenate "{Active}".§'"
   # strip spaces from the end, if any
   If "{CurrentSelection}" =~ /([¬ ∂t]+)®1[ ∂t]*/
      Set CurrentSelection "{®1}"
   End

   # can this happen at this point?
   If "{CurrentSelection}" == ""
      Beep
      Exit 0
   End
End

# a list of matching command names
Set CommandList ""
# the number of matches found
Set Matches 0

# first see if it's one of the built-in commands
# (we really have to list them all here, sigh...)
For i In ∂
      AddMenu AddPane Adjust Alert Alias Align AuthorInfo ∂
      Beep Begin Break Browser Catenate CheckIn CheckOut ∂
      CheckOutDir Clear Close Confirm Continue Copy Cut Date ∂
      Delete DeleteMenu DeleteNames DeletePane ∂
      DeleteRevisions Directory Duplicate ∂
      DuplicateNameRevisions Echo Eject Equal Erase Evaluate ∂
      Execute Exists Exit Export Files Find Flush ∂
      FlushAllVolumes For Format Help HideWindows If ∂
      LockNameRevisions Loop Mark Markers ModifyReadOnly ∂
      Monitors Mount MountProject Move MoveWindow ∂
      NameRevisions New Newer NewFolder NewProject ∂
      ObsoleteNameRevisions ObsoleteProjectorFile Open ∂
      Parameters Paste PlaySound Position Project ProjectInfo ∂
      Quit Quote Redo Rename RenameProjectorFile Replace ∂
      Request ResolveAlias Revert RotatePanes RotateWindows ∂
      RProj RShell Save SaveOnClose Set SetFile SetKey Shift ∂
      ShowSelection ShowWindows Shutdown SizeWindow ∂
      StackWindows Target TickCount TileWindows Unalias Undo ∂
      Unexport UnlockNameRevisions Unmark Unmount ∂
      UnmountProject UnobsoleteNameRevisions ∂
      UnObsoleteProjectorFile Unset UnsetKey ∂
      UpdateProjectorDatabase Version Volumes Which Windows ∂
      ZoomWindow
   If "{i}" =~ /{CurrentSelection}≈/
      Set CommandList "{CommandList} {i}"
      Evaluate Matches += 1

   End
End

# now process every folder in the current {Commands} list
For Folder in 'Which'
   For File In 'Files "{Folder}" -s'

      # append all matching names to our list of command names
      If "{File}" =~ /{CurrentSelection}≈/
         Set CommandList "{{CommandList}} '{File}'"
         Evaluate Matches += 1

      End
   End
End

# no matching names found
If {Matches} == 0
   Find /∞/ "{Active}"
   Exit 0
End

# if more than one name was found, present a list
# to choose from
If {Matches} > 1
   Set CommandList "'GetListItem -sort -s -c {CommandList}'"
   Exit 0 If "{CommandList}" == ""
Else If "{CommandList}" =~ / (≈)®1/

   # if only one name was found, it has a space at the
   # beginning; strip it.  And remove any unnecessary
   # quoting.
   Set CommandList "'Quote {®1}'"
End

# replace the selection with the found (or chosen) name
Echo -n "{CommandList} " > "{Active}".§
Find §Δ "{Active}"

Stefan Haller
stk@snafu.de

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

beaTunes 5.0.2 - Organize your music col...
beaTunes is a full-featured music player and organizational tool for music collections. How well organized is your music library? Are your artists always spelled the same way? Any R.E.M. vs REM?... Read more
iFFmpeg 6.4.1 - Convert multimedia files...
iFFmpeg is a comprehensive media tool to convert movie, audio and media files between formats. The FFmpeg command line instructions can be very hard to master/understand, so iFFmpeg does all the hard... Read more
Hopper Disassembler 4.2.6- - Binary disa...
Hopper Disassembler is a binary disassembler, decompiler, and debugger for 32- and 64-bit executables. It will let you disassemble any binary you want, and provide you all the information about its... Read more
iExplorer 4.1.2.0 - View and transfer fi...
iExplorer is an iPhone browser for Mac lets you view the files on your iOS device. By using a drag and drop interface, you can quickly copy files and folders between your Mac and your iPhone or... Read more
TunnelBear 3.0.15 - Subscription-based p...
TunnelBear is a subscription-based virtual private network (VPN) service and companion app, enabling you to browse the internet privately and securely. Features Browse privately - Secure your data... Read more
Carbon Copy Cloner 4.1.16 - Easy-to-use...
Carbon Copy Cloner backups are better than ordinary backups. Suppose the unthinkable happens while you're under deadline to finish a project: your Mac is unresponsive and all you hear is an ominous,... Read more
Day One 2.3 - Maintain a daily journal.
Day One is the easiest and best-looking way to use a journal / diary / text-logging application for the Mac. Day One is well designed and extremely focused to encourage you to write more through... Read more
Sketch 45 - Design app for UX/UI for iOS...
Sketch is an innovative and fresh look at vector drawing. Its intentionally minimalist design is based upon a drawing space of unlimited size and layers, free of palettes, panels, menus, windows, and... Read more
NeoFinder 7.1 - Catalog your external me...
NeoFinder (formerly CDFinder) rapidly organizes your data, either on external or internal disks, or any other volumes. It catalogs all your data, so you stay in control of your data archive or disk... Read more
Day One 2.3 - Maintain a daily journal.
Day One is the easiest and best-looking way to use a journal / diary / text-logging application for the Mac. Day One is well designed and extremely focused to encourage you to write more through... Read more

Latest Forum Discussions

See All

Kalimba™ (Games)
Kalimba™ 1.0 Device: iOS Universal Category: Games Price: $3.99, Version: 1.0 (iTunes) Description: ** BAFTA-nominated ‘Best New Property’ 2015 ** Jump, slide and fly your way through a beautiful, mind-bending world in this award-... | Read more »
All That Remains: Part 1 (Games)
All That Remains: Part 1 1.0 Device: iOS Universal Category: Games Price: $.99, Version: 1.0 (iTunes) Description: “Duncan Price is paranoid” they used to say. He’s just a “local nut” they said. They used to say a lot of things about... | Read more »
Super Samurai Rampage (Games)
Super Samurai Rampage 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: Super Samurai Rampage is a bloody, retro pixel style high score chaser. You play as a legendary Samurai warrior provoked... | Read more »
You can now travel to Skyrim in The Elde...
The Elder Scrolls: Legends' new expansion has opened up Skyrim's craggy mountains and snowy plains for exploration today. Heroes of Skyrim is out now, adding a bunch of new Skyrim content to Bethesda's recent CCG. [Read more] | Read more »
High-stakes solitaire game 'Missile...
Missile Command and Solitaire might seem like an odd couple, but indie developer Nathan Meunier has brought them together to create his first game, Missile Cards, which launched on the App Store today. [Read more] | Read more »
Eos 2 (Music)
Eos 2 2.0.2 Device: iOS Universal Category: Music Price: $5.99, Version: 2.0.2 (iTunes) Description: | Read more »
Supercell celebrates Hay Day's comm...
Before there was Clash Royale or Clash of Clans, there was Hay Day. Now, Supercell's first game is celebrating its fifth anniversary, and the developer is commemorating the event with this touching new video. Supercell picked one long-running Hay... | Read more »
Dive into epic summer adventure with Oce...
Summer may be the best time to enjoy ocean adventures, and now you don’t even have to leave the comfort of your own home, thanks to the folks at Joycity, creators of Oceans & Empires. The old-timey naval MMO is getting a sizable new June Grand... | Read more »
Missile Cards (Games)
Missile Cards 1.0.9 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0.9 (iTunes) Description: "Missile Command meets Solitaire...only with more doomlasers, death, and explosions." | Read more »
Collect mini assassins in 'Assassin...
Assassin's Creed is traveling back in time to the Spanish Inquisition for its latest mobile entry, Assassin's Creed Rebellion. The game is giving the series a look that's a huge departure from its past design, recreating classic characters in a... | Read more »

Price Scanner via MacPrices.net

New 15-inch 2.8GHz Touch Bar MacBook Pros on...
MacMall has the new 2017 15″ 2.8GHz MacBook Pros in stock and on sale for $2279 including free shipping. Their price is $120 off MSRP, and it’s the lowest price available for these models: - 15″ 2.... Read more
Will iPad Running iOS 11 Be The ‘Ute’ Of The...
Steve Jobs’ analogy comparing iPads and PCs to cars and trucks respectively is seven years old but still stimulates discussion and debate. Appearing on an All Things D panel in 2010 shortly after the... Read more
Free CarePassport App gives Patients control...
Boston based CarePassport is on a mission to enable patients to take control of their medical records by allowing patients to aggregate, store, share and manage all their medical data including... Read more
Western Digital Launches New My Passport Ultr...
Western Digital Corporation has expanded its WD brand My Passport portable drive line with the redesigned My Passport Ultra drive. In addition to a new metallic look, the drive offers intuitive WD... Read more
Clearance 2016 13-inch MacBook Pros available...
B&H Photo has clearance 2016 13″ MacBook Pros in stock today for up to $210 off original MSRP. Shipping is free, and B&H charges NY & NJ sales tax only: - 13″ 2.9GHz/512GB Touch Bar... Read more
Apple Releases iOS 11 Public Beta; How To Get...
The official release of Apple’s latest mobile operating system iOS 11 is vaguely slated for the fall, but as of June 26, ordinary users can download an iOS 11 public beta. To download the iOS 11... Read more
Extend Life of MacBook Pro Retina 2.0TB With...
MacSales.com/Other World Computing has announced availability of the new OWC 2.0TB Aura Pro Solid State Drive for mid-2012 to early 2013 Apple MacBook Pro with Retina display. One of the fastest... Read more
BBEdit SummerFest 2017 Discount Ends Friday,...
You can get 20% off BBEdit for a limited time in Bare Bones Software’s http://www.eastgate.com/Tinderbox/Specials/SummerFest.html?mc_cid=f2101ca260&mc_eid=[UNIQID]SummerFest 2017 sale and... Read more
Use Apple’s Education discount to save up to...
Purchase a new Mac using Apple’s Education discount, and take up to $300 off MSRP. All teachers, students, and staff of any educational institution qualify for the discount. Shipping is free: - 15″ 2... Read more
Clearance 27-inch 3.3GHz 5K iMac available fo...
Amazon clearance 27″ 3.3GHz 5K iMacs (MK482LL/A) available for $1799.90 including free shipping. Their price is $500 off original MSRP, and it’s the lowest price available for this model from any... Read more

Jobs Board

*Apple* Online Store WW Customer Insights -...
…with data mining tools: R, SAS, etc.Experience with common shell scripting tools: unix, python, apple script, Swift etc. Apple Online is one of the largest and Read more
Engineering Project Manager, *Apple* Online...
…the electronic commerce (eCommerce) systems and solutions that enable and support the Apple Online Store (AOS) - one of world's largest online retail businesses, Read more
*Apple* News Product Marketing Mgr., Publish...
…organizational consensus on strategy and vision for publisher tools, authoring, and Apple News Format.Carries this strategy and vision across the organization to Read more
*Apple* Retail - Multiple Positions - Apple,...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
Security Data Analyst - *Apple* Information...
…data sources need to be collected to allow Information Security to better protect Apple employees and customers from a wide range of threats.Act as the subject matter Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.