view lib-src/gzip-el.sh @ 151:59463afc5666 r20-3b2

Import from CVS: tag r20-3b2
author cvs
date Mon, 13 Aug 2007 09:37:19 +0200
parents ec9a17fef872
children 6075d714658b
line wrap: on
line source

#! /bin/sh
### gzip-el.sh --- compress superfluous installed source lisp

# Author:	Jeff Miller <jmiller@bay1.bayserve.net>
# Author:	Hrvoje Niksic <hniksic@srce.hr>
# Maintainer:	Steve Baur <steve@altair.xemacs.org>
# Created:	13 Feb 1997
# Version:	1.0
# Keywords:	internal


#
#
echo Compressing .el files in "$1"...

find "$1" -type f -name "*.el" -print |
	while read file; do
		[ -s "${file}c" ] && echo "$file" && gzip -f9 "$file"
	done

echo Compressing .el files in "$1"...done.