#!/bin/rc
# make thumbnails from *.p?m
# Fri Jan 7 07:29:16 MET 2005 Peter A. Cejchan <cej@gli.cas.cz | pac7@post.cz | pac@plan9.cz>

rfork e
mkdir ../thumbs
for (name in *.p?m) {
pnmscale 0.1 $name > ../thumbs/$name
}

#-eof-