The default "Set Desktop Picture" is broken.
Where to Save:
~/Library/Application Support/Quicksilver/Actions
Usage:
Bring file or folder in first pane of Quicksilver and run this script
from the second pane.
If a folder is selected, then any image will randomly be set as the
Desktop picture.
on open aitem
set aitem to aitem as text
if aitem ends with ":" then
my processfolder(aitem)
else
tell application "Finder" to set desktop picture to aitem
end if
end open
on processfolder(aitem)
tell application "Finder"
set theList to (every file of folder aitem)
set desktop picture to some item of theList
end tell
end processfolder
