# -*- tcl -*-
# --------------------------------------------------
# (C) 1997	Andreas Kupries <a.kupries@westend.com>
#
# @comment	library of 'makedist', packaging of a
# @comment	module into a 'zip'-archive.
#
# CVS:	$Id: pack_zip,v 1.3 1998/06/02 16:59:14 aku Exp $
# --------------------------------------------------

::makedist::packer zip Zip zip {
    # @c Packs the named <a module> via 'zip'. The archive is automatically
    # @c compressed by this.
    #
    # @a module: name of the module (= directory) to be packed.
    # @a module:

    # @danger dependent on unix (/dev/null)

    exec zip -r9 ${module}.zip $module > /dev/null
    return
}
