ウクレレ日記(at)kimux.org

アマゾンから予定より一日早く、Lumix G 20mm F1.7 が届いた！ もう夕方だったがさっそくお散歩。明るいレンズだから暗くても大丈夫？ いくつか flickr に置いてみた。

MacBook を Snow Leopard にしてから、ログインするとデスクトップ上のアイコンが右側にべったり並び替えられてしまう現象が。 10.6.1 へのバージョンアップで直るかと思ったらダメ。 ググってみると、3k1 さんという方が Snow Leopard：AppleScriptでデスクトップアイコンの位置を記録／再生 しているではないか。 で、記録と復元を選べるように、またキャンセルもできるように改造してみた。AppleScript なんて超、久しぶり。

property iconList : {}
property locList : {}

tell application "Finder"
	set ans to display dialog "デスクトップのアイコンを？" buttons {"記録", "戻す"} default button 2
	set text_ans to button returned of ans
	set yes_cancel to display dialog text_ans & "ですね"
	if text_ans = "記録" then
		set iconList to every item of desktop
		set locList to desktop position of every item of desktop
		display dialog "記録しました。" buttons {"OK"} default button 1
	else
		if iconList = {} then
			display dialog "戻したいけど記録がないよ"
		else
			repeat with i from 1 to (number of iconList)
				try
					set desktop position of item i of iconList to item i of locList
				end try
			end repeat
			display dialog "戻しました。" buttons {"OK"} default button 1
		end if
	end if
end tell