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

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

  ViewVC Help
Powered by ViewVC 1.1.20