File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change 3232
3333set help = 0
3434set fromscratch = 0
35- set maxsize = 200
35+ set maxsize = 150
3636
3737while ( $# argv > 0 )
3838 switch ($argv [1])
@@ -114,10 +114,17 @@ foreach figfile ( $figfiles )
114114 mkdir -p $figfolder
115115 set size = ` du -k $figfile | awk ' {print $1}' `
116116 set target = $figfolder /$figfile :t
117- if ( $size > $maxsize && $figfile :e == pdf ) then
118- convert $figfile intermediate.png
119- convert intermediate.png $target
120- rm intermediate.png
117+ if ( $size > $maxsize ) then
118+ if ( $figfile :e == pdf ) then
119+ set intermediate = intermediate.png
120+ convert $figfile $intermediate
121+ else
122+ set ext = $figfile :e
123+ set intermediate = intermediate.$ext
124+ convert -geometry 25%x25% -depth 72 -units pixelsperinch $figfile $intermediate
125+ endif
126+ mv $intermediate $target
127+ rm $intermediate
121128 echo " Reduced file size:"
122129 du -k $figfile $target
123130 else
You can’t perform that action at this time.
0 commit comments