tell application "Safari" -- turn Status view on
activate
tell window 1
set {null, topSide, null, bottomSide} to bounds
set x to bottomSide - topSide
delay 1
tell application "System Events" to keystroke "/" using command down
delay 1
set {null, topSide1, null, bottomSide1} to bounds
set y to bottomSide1 - topSide1
if y < x then tell application "System Events" to keystroke "/" using command down
end tell
end tell
Robert Poland - Fort Collins, CO