Submit Hint Search The Forums LinksStatsPollsHeadlinesRSS
14,000 hints and counting!


Click here to return to the 'Use a miniaturized Buddy List in iChat' hint
The following comments are owned by whoever posted them. This site is not responsible for what they say.
Use a miniaturized Buddy List in iChat
Authored by: Fenton on Jun 06, '06 08:19:24AM

Here's much the same, but as a simple toggle script. Put it (or an alias to it) in the iChat Scripts folder (available from the "Open Scripts Folder" when iChat is the active application).


tell application "iChat"
tell (a reference to the bounds of window "Buddy List")
set theBounds to get contents
if item 4 of theBounds > 300 then
set contents to (items 1 thru 3 of (get contents) & (item 2 of (get contents)) + 94)
else
set contents to (items 1 thru 3 of (get contents) & (item 2 of (get contents)) + 302)
end if
end tell
end tell


---
FileMaker Developer
San Diego



[ Reply to This | # ]
Use a miniaturized Buddy List in iChat
Authored by: ever on Jun 07, '06 05:40:39AM
Toggling is an excellent idea, but your script only works when the buddy list is in the upper part of the display. A friendlier solution would be to store the previous window dimension in a script property, alike so...

property unzoomed : missing value
tell application "iChat"
 set wr to a reference to the bounds of window "Buddy List"
 set wb to wr's contents
 if (item 4 of wb) - (item 2 of wb) = 94 then
  if unzoomed is missing value then
   set wr's contents to items 1 thru 3 of wb & (item 2 of wb) + 300
  else
   set wr's contents to unzoomed
  end if
 else
  set unzoomed to wb
  set wr's contents to items 1 thru 3 of wb & (item 2 of wb) + 94
 end if
end tell


[ Reply to This | # ]