view lib-src/gzip-el.sh @ 177:6075d714658b r20-3b15

Import from CVS: tag r20-3b15
author cvs
date Mon, 13 Aug 2007 09:51:16 +0200
parents ec9a17fef872
children bfd6434d15b3
line wrap: on
line source

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

# Author:	Jeff Miller <jmiller@smart.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.