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

Diff of /eclass/elisp-common.eclass

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 1.7 Revision 1.14
1# Copyright 1999-2004 Gentoo Foundation 1# Copyright 1999-2004 Gentoo Foundation
2# Distributed under the terms of the GNU General Public License v2 2# Distributed under the terms of the GNU General Public License v2
3# $Header: /var/cvsroot/gentoo-x86/eclass/elisp-common.eclass,v 1.7 2004/06/25 00:39:48 vapier Exp $ 3# $Header: /var/cvsroot/gentoo-x86/eclass/elisp-common.eclass,v 1.14 2005/09/17 01:02:40 ciaranm Exp $
4# 4#
5# Copyright 2002-2003 Matthew Kennedy <mkennedy@gentoo.org> 5# Copyright 2002-2003 Matthew Kennedy <mkennedy@gentoo.org>
6# Copyright 2003 Jeremy Maitin-Shepard <jbms@attbi.com> 6# Copyright 2003 Jeremy Maitin-Shepard <jbms@attbi.com>
7# 7#
8# This is not an eclass, but it does provide emacs-related 8# This is not an eclass, but it does provide emacs-related
9# installation utilities. 9# installation utilities.
10 10
11ECLASS=elisp-common
12INHERITED="$INHERITED $ECLASS"
13 11
14SITELISP=/usr/share/emacs/site-lisp 12SITELISP=/usr/share/emacs/site-lisp
15 13
16elisp-compile() { 14elisp-compile() {
17 /usr/bin/emacs --batch -f batch-byte-compile --no-site-file --no-init-file $* 15 /usr/bin/emacs --batch -f batch-byte-compile --no-site-file --no-init-file $*
29 local sitefile=$1 my_pn=${2:-${PN}} 27 local sitefile=$1 my_pn=${2:-${PN}}
30 pushd ${S} 28 pushd ${S}
31 cp ${sitefile} ${T} 29 cp ${sitefile} ${T}
32 sed -i "s:@SITELISP@:${SITELISP}/${my_pn}:g" ${T}/$(basename ${sitefile}) 30 sed -i "s:@SITELISP@:${SITELISP}/${my_pn}:g" ${T}/$(basename ${sitefile})
33 insinto ${SITELISP} 31 insinto ${SITELISP}
34 doins ${T}/$(basename ${sitefile}) 32 doins ${T}/$(basename ${sitefile}) || die "failed to install site file"
35 popd 33 popd
36} 34}
37 35
38elisp-site-regen() { 36elisp-site-regen() {
39 einfo "Regenerating ${SITELISP}/site-gentoo.el..." 37 einfo "Regenerating ${SITELISP}/site-gentoo.el ..."
40 einfo "" 38 einfo ""
41 cat <<EOF >${SITELISP}/site-gentoo.el 39 cat <<EOF >${SITELISP}/site-gentoo.el
42;;; DO NOT EDIT THIS FILE -- IT IS GENERATED AUTOMATICALLY BY PORTAGE 40;;; DO NOT EDIT THIS FILE -- IT IS GENERATED AUTOMATICALLY BY PORTAGE
43;;; ----------------------------------------------------------------- 41;;; -----------------------------------------------------------------
44 42
45EOF 43EOF
46 ls ${SITELISP}/[0-9][0-9]*-gentoo.el |sort -n | \ 44 ls ${SITELISP}/[0-9][0-9]*-gentoo.el |sort -n | \
47 while read sf 45 while read sf
48 do 46 do
49 einfo " Adding $(basename $sf)..." 47 einfo " Adding $(basename $sf) ..."
50 # Great for debugging, too noisy and slow for users though 48 # Great for debugging, too noisy and slow for users though
51# echo "(message \"Loading $sf...\")" >>${SITELISP}/site-start.el 49# echo "(message \"Loading $sf ...\")" >>${SITELISP}/site-start.el
52 cat $sf >>${SITELISP}/site-gentoo.el 50 cat $sf >>${SITELISP}/site-gentoo.el
53 done 51 done
54 while read line; do einfo "${line}"; done <<EOF 52 while read line; do einfo "${line}"; done <<EOF
55 53
56All site initialization for Gentoo-installed packages is now added to 54All site initialization for Gentoo-installed packages is now added to
57/usr/share/emacs/site-lisp/site-gentoo.el; site-start.el is no longer 55/usr/share/emacs/site-lisp/site-gentoo.el; site-start.el is no longer
58managed by Gentoo. You may want to remove the generated 56managed by Gentoo. You are responsible for all maintenance of
59site-start.el. 57site-start.el if there is such a file.
60 58
61In order for this site initialization to be loaded for all users 59In order for this site initialization to be loaded for all users
62automatically, as was done previously, you can add a line like this: 60automatically, as was done previously, you can add a line like this:
63 61
64 (load "/usr/share/emacs/site-lisp/site-gentoo") 62 (load "/usr/share/emacs/site-lisp/site-gentoo")
74# The following Emacs Lisp compilation routine is taken from GNU 72# The following Emacs Lisp compilation routine is taken from GNU
75# autotools. 73# autotools.
76 74
77elisp-comp() { 75elisp-comp() {
78# Copyright 1995 Free Software Foundation, Inc. 76# Copyright 1995 Free Software Foundation, Inc.
79# Franois Pinard <pinard@iro.umontreal.ca>, 1995. 77# Franรงois Pinard <pinard@iro.umontreal.ca>, 1995.
80# 78#
81# This program is free software; you can redistribute it and/or modify 79# This program is free software; you can redistribute it and/or modify
82# it under the terms of the GNU General Public License as published by 80# it under the terms of the GNU General Public License as published by
83# the Free Software Foundation; either version 2, or (at your option) 81# the Free Software Foundation; either version 2, or (at your option)
84# any later version. 82# any later version.
133# Local Variables: *** 131# Local Variables: ***
134# mode: shell-script *** 132# mode: shell-script ***
135# tab-width: 4 *** 133# tab-width: 4 ***
136# indent-tabs-mode: t *** 134# indent-tabs-mode: t ***
137# End: *** 135# End: ***
138

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.14

  ViewVC Help
Powered by ViewVC 1.1.20