/[gentoo-x86]/eclass/elisp-common.eclass
Gentoo

Contents of /eclass/elisp-common.eclass

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (hide annotations) (download)
Sun Sep 21 01:40:41 2003 UTC (10 years, 11 months ago) by mkennedy
Branch: MAIN
separated elisp into elisp and elisp-common

1 mkennedy 1.1 # Copyright 1999-2003 Gentoo Technologies, Inc.
2     # Distributed under the terms of the GNU General Public License v2
3     # $Header: /home/cvsroot/gentoo-x86/eclass/elisp.eclass,v 1.7 2003/09/20 22:27:08 mkennedy Exp $
4     #
5     # Author Matthew Kennedy <mkennedy@gentoo.org>
6     #
7     # This is not an eclass, but it does provide emacs-related
8     # installation utilities.
9    
10     ECLASS=elisp-common
11     INHERITED="$INHERITED $ECLASS"
12    
13     SITELISP=/usr/share/emacs/site-lisp
14    
15     elisp-install() {
16     local subdir=$1
17     dodir ${SITELISP}/${subdir}
18     insinto ${SITELISP}/${subdir}
19     shift
20     doins $@
21     }
22    
23     elisp-site-file-install() {
24     local sitefile=$1
25     pushd ${S}
26     cp ${sitefile} .
27     D=${S}/ dosed "s:@SITELISP@:${SITELISP}/${PN}:g" $(basename ${sitefile})
28     insinto ${SITELISP}
29     doins ${S}/$(basename ${sitefile})
30     popd
31     }
32    
33     elisp-site-regen() {
34     einfo "Regenerating ${SITELISP}/site-start.el..."
35     einfo ""
36     cat <<EOF >${SITELISP}/site-start.el
37     ;;; DO NOT EDIT THIS FILE -- IT IS GENERATED AUTOMATICALLY BY PORTAGE
38     ;;; -----------------------------------------------------------------
39    
40     EOF
41     ls ${SITELISP}/[0-9][0-9]* |sort -n |grep -vE '~$' | \
42     while read sf
43     do
44     einfo " Adding $sf..."
45     # Great for debugging, too noisy and slow for users though
46     # echo "(message \"Loading $sf...\")" >>${SITELISP}/site-start.el
47     cat $sf >>${SITELISP}/site-start.el
48     done
49     einfo ""
50     }
51    
52     # Local Variables: ***
53     # mode: shell-script ***
54     # tab-width: 4 ***
55     # indent-tabs-mode: t ***
56     # End: ***

  ViewVC Help
Powered by ViewVC 1.1.20