1 | # Copyright 1999-2007 Gentoo Foundation |
1 | # Copyright 1999-2007 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.20 2007/04/29 12:59:39 ulm Exp $ |
3 | # $Header: /var/cvsroot/gentoo-x86/eclass/elisp-common.eclass,v 1.31 2007/12/01 15:35:02 ulm Exp $ |
4 | # |
4 | # |
5 | # Copyright 2007 Christian Faulhammer <opfer@gentoo.org> |
5 | # Copyright 2007 Christian Faulhammer <opfer@gentoo.org> |
6 | # Copyright 2002-2007 Matthew Kennedy <mkennedy@gentoo.org> |
6 | # Copyright 2002-2004 Matthew Kennedy <mkennedy@gentoo.org> |
|
|
7 | # Copyright 2004-2005 Mamoru Komachi <usata@gentoo.org> |
7 | # Copyright 2003 Jeremy Maitin-Shepard <jbms@attbi.com> |
8 | # Copyright 2003 Jeremy Maitin-Shepard <jbms@attbi.com> |
8 | # Copyright 2007 Ulrich Mueller <ulm@gentoo.org> |
9 | # Copyright 2007 Ulrich Mueller <ulm@gentoo.org> |
9 | # |
10 | # |
10 | # This is not a real eclass, but it does provide Emacs-related installation |
11 | # @ECLASS: elisp-common.eclass |
11 | # utilities. |
12 | # @MAINTAINER: |
12 | # |
13 | # Feel free to contact the Emacs team through <emacs@gentoo.org> if you have |
13 | # USAGE: |
14 | # problems, suggestions or questions. |
|
|
15 | # @BLURB: Emacs-related installation utilities |
|
|
16 | # @DESCRIPTION: |
14 | # |
17 | # |
15 | # Usually you want to use this eclass for (optional) GNU Emacs support of |
18 | # Usually you want to use this eclass for (optional) GNU Emacs support of |
16 | # your package. This is NOT for XEmacs! |
19 | # your package. This is NOT for XEmacs! |
|
|
20 | # |
17 | # Many of the steps here are sometimes done by the build system of your |
21 | # Many of the steps here are sometimes done by the build system of your |
18 | # package (especially compilation), so this is mainly for standalone elisp |
22 | # package (especially compilation), so this is mainly for standalone elisp |
19 | # files you gathered from somewhere else. |
23 | # files you gathered from somewhere else. |
|
|
24 | # |
20 | # When relying on the emacs USE flag, you need to add |
25 | # When relying on the emacs USE flag, you need to add |
21 | # |
26 | # |
22 | # emacs? ( virtual/emacs ) |
27 | # emacs? ( virtual/emacs ) |
23 | # |
28 | # |
24 | # to your DEPEND/RDEPEND line and use the functions provided here to bring |
29 | # to your DEPEND/RDEPEND line and use the functions provided here to bring |
25 | # the files to the correct locations. |
30 | # the files to the correct locations. |
26 | # |
31 | # |
|
|
32 | # .SS |
27 | # src_compile() usage: |
33 | # src_compile() usage: |
28 | # -------------------- |
|
|
29 | # |
34 | # |
30 | # An elisp file is compiled by the elisp-compile() function defined here and |
35 | # An elisp file is compiled by the elisp-compile() function defined here and |
31 | # simply takes the source files as arguments. In the case of interdependent |
36 | # simply takes the source files as arguments. |
32 | # elisp files, you can use the elisp-comp() function which makes sure all |
|
|
33 | # files are loadable. |
|
|
34 | # |
37 | # |
35 | # elisp-compile *.el || die "elisp-compile failed!" |
38 | # elisp-compile *.el || die "elisp-compile failed" |
36 | # or |
39 | # |
|
|
40 | # In the case of interdependent elisp files, you can use the elisp-comp() |
|
|
41 | # function which makes sure all files are loadable. |
|
|
42 | # |
37 | # elisp-comp *.el || die "elisp-comp failed!" |
43 | # elisp-comp *.el || die "elisp-comp failed" |
38 | # |
44 | # |
39 | # Function elisp-make-autoload-file() can be used to generate a file with |
45 | # Function elisp-make-autoload-file() can be used to generate a file with |
40 | # autoload definitions for the lisp functions. It takes the output file name |
46 | # autoload definitions for the lisp functions. It takes the output file name |
41 | # (default: "${PN}-autoloads.el") and a list of directories (default: working |
47 | # (default: "${PN}-autoloads.el") and a list of directories (default: working |
42 | # directory) as its arguments. Use of this function requires that the elisp |
48 | # directory) as its arguments. Use of this function requires that the elisp |
43 | # source files contain magic ";;;###autoload" comments. See the Emacs Lisp |
49 | # source files contain magic ";;;###autoload" comments. See the Emacs Lisp |
44 | # Reference Manual (node "Autoload") for a detailed explanation. |
50 | # Reference Manual (node "Autoload") for a detailed explanation. |
45 | # |
51 | # |
|
|
52 | # .SS |
46 | # src_install() usage: |
53 | # src_install() usage: |
47 | # -------------------- |
|
|
48 | # |
54 | # |
49 | # The resulting compiled files (.elc) should be put in a subdirectory of |
55 | # The resulting compiled files (.elc) should be put in a subdirectory of |
50 | # /usr/share/emacs/site-lisp/ which is named after the first argument |
56 | # /usr/share/emacs/site-lisp/ which is named after the first argument |
51 | # of elisp-install(). The following parameters are the files to be put in |
57 | # of elisp-install(). The following parameters are the files to be put in |
52 | # that directory. Usually the subdirectory should be ${PN}, you can choose |
58 | # that directory. Usually the subdirectory should be ${PN}, you can choose |
53 | # something else, but remember to tell elisp-site-file-install() (see below) |
59 | # something else, but remember to tell elisp-site-file-install() (see below) |
54 | # the change, as it defaults to ${PN}. |
60 | # the change, as it defaults to ${PN}. |
55 | # |
61 | # |
56 | # elisp-install ${PN} *.elc *.el || die "elisp-install failed!" |
62 | # elisp-install ${PN} *.el *.elc || die "elisp-install failed" |
57 | # |
63 | # |
58 | # To let the Emacs support be activated by Emacs on startup, you need |
64 | # To let the Emacs support be activated by Emacs on startup, you need |
59 | # to provide a site file (shipped in ${FILESDIR}) which contains the startup |
65 | # to provide a site file (shipped in ${FILESDIR}) which contains the startup |
60 | # code (have a look in the documentation of your software). Normally this |
66 | # code (have a look in the documentation of your software). Normally this |
61 | # would look like this: |
67 | # would look like this: |
62 | # |
68 | # |
63 | # ;;; csv-mode site-lisp configuration |
69 | # ;;; csv-mode site-lisp configuration |
64 | # |
70 | # |
65 | # (add-to-list 'load-path "@SITELISP@") |
71 | # (add-to-list 'load-path "@SITELISP@") |
66 | # (add-to-list 'auto-mode-alist '("\\.csv\\'" . csv-mode)) |
72 | # (add-to-list 'auto-mode-alist '("\\.csv\\'" . csv-mode)) |
67 | # (autoload 'csv-mode "csv-mode" "Major mode for editing csv files." t) |
73 | # (autoload 'csv-mode "csv-mode" "Major mode for csv files." t) |
68 | # |
74 | # |
69 | # If your Emacs support files are installed in a subdirectory of |
75 | # If your Emacs support files are installed in a subdirectory of |
70 | # /usr/share/emacs/site-lisp/ (which is recommended if more than one file is |
76 | # /usr/share/emacs/site-lisp/ (which is recommended), you need to extend |
71 | # installed), you need to extend Emacs' load-path as shown in the first |
77 | # Emacs' load-path as shown in the first non-comment. |
72 | # non-comment. The elisp-site-file-install() function of this eclass will |
78 | # The elisp-site-file-install() function of this eclass will replace |
73 | # replace "@SITELISP@" by the actual path. |
79 | # "@SITELISP@" by the actual path. |
|
|
80 | # |
74 | # The next line tells Emacs to load the mode opening a file ending with |
81 | # The next line tells Emacs to load the mode opening a file ending with |
75 | # ".csv" and load functions depending on the context and needed features. |
82 | # ".csv" and load functions depending on the context and needed features. |
76 | # Be careful though. Commands as "load-library" or "require" bloat the |
83 | # Be careful though. Commands as "load-library" or "require" bloat the |
77 | # editor as they are loaded on every startup. When having a lot of Emacs |
84 | # editor as they are loaded on every startup. When having a lot of Emacs |
78 | # support files, users may be annoyed by the start-up time. Also avoid |
85 | # support files, users may be annoyed by the start-up time. Also avoid |
79 | # keybindings as they might interfere with the user's settings. Give a hint |
86 | # keybindings as they might interfere with the user's settings. Give a hint |
80 | # in pkg_postinst(), which should be enough. |
87 | # in pkg_postinst(), which should be enough. |
|
|
88 | # |
81 | # The naming scheme for this site file is "[0-9][0-9]*-gentoo.el", where the |
89 | # The naming scheme for this site file is "[0-9][0-9]*-gentoo.el", where the |
82 | # two digits at the beginning define the loading order. So if you depend on |
90 | # two digits at the beginning define the loading order. So if you depend on |
83 | # another Emacs package, your site file's number must be higher! |
91 | # another Emacs package, your site file's number must be higher! |
|
|
92 | # |
84 | # Best practice is to define a SITEFILE variable in the global scope of your |
93 | # Best practice is to define a SITEFILE variable in the global scope of your |
85 | # ebuild (right after DEPEND e.g.): |
94 | # ebuild (right after DEPEND e.g.): |
86 | # |
95 | # |
87 | # SITEFILE=50${PN}-gentoo.el |
96 | # SITEFILE=50${PN}-gentoo.el |
88 | # |
97 | # |
89 | # Which is then installed by |
98 | # Which is then installed by |
90 | # |
99 | # |
91 | # elisp-site-file-install "${FILESDIR}/${SITEFILE}" |
100 | # elisp-site-file-install "${FILESDIR}/${SITEFILE}" || die |
92 | # |
101 | # |
93 | # in src_install(). If your subdirectory is not named ${PN}, give the |
102 | # in src_install(). If your subdirectory is not named ${PN}, give the |
94 | # differing name as second argument. |
103 | # differing name as second argument. |
95 | # |
104 | # |
|
|
105 | # .SS |
96 | # pkg_postinst() / pkg_postrm() usage: |
106 | # pkg_postinst() / pkg_postrm() usage: |
97 | # ------------------------------------ |
|
|
98 | # |
107 | # |
99 | # After that you need to recreate the start-up file of Emacs after emerging |
108 | # After that you need to recreate the start-up file of Emacs after emerging |
100 | # and unmerging by using |
109 | # and unmerging by using |
101 | # |
110 | # |
102 | # pkg_postinst() { |
111 | # pkg_postinst() { |
103 | # elisp-site-regen |
112 | # elisp-site-regen |
104 | # } |
113 | # } |
|
|
114 | # |
105 | # pkg_postrm() { |
115 | # pkg_postrm() { |
106 | # elisp-site-regen |
116 | # elisp-site-regen |
107 | # } |
117 | # } |
108 | # |
118 | # |
109 | # As always: Feel free to contact Emacs team through emacs@gentoo.org if you |
119 | # When having optional Emacs support, you should prepend "use emacs &&" to |
110 | # have problems, suggestions or questions. |
120 | # above calls of elisp-site-regen(). Don't use "has_version virtual/emacs"! |
|
|
121 | # When unmerging the state of the emacs USE flag is taken from the package |
|
|
122 | # database and not from the environment, so it is no problem when you unset |
|
|
123 | # USE=emacs between merge and unmerge of a package. |
|
|
124 | # |
|
|
125 | # .SS |
|
|
126 | # Miscellaneous functions: |
|
|
127 | # |
|
|
128 | # elisp-emacs-version() outputs the version of the currently active Emacs. |
111 | |
129 | |
|
|
130 | # @ECLASS-VARIABLE: SITELISP |
|
|
131 | # @DESCRIPTION: |
|
|
132 | # Directory where packages install Emacs Lisp files. |
112 | SITELISP=/usr/share/emacs/site-lisp |
133 | SITELISP=/usr/share/emacs/site-lisp |
113 | |
134 | |
|
|
135 | # Directory where packages install miscellaneous (not Lisp) files. |
|
|
136 | SITEETC=/usr/share/emacs/etc |
|
|
137 | |
|
|
138 | # @ECLASS-VARIABLE: SITEFILE |
|
|
139 | # @DESCRIPTION: |
|
|
140 | # Name of package's site-init file. |
|
|
141 | SITEFILE=50${PN}-gentoo.el |
|
|
142 | |
|
|
143 | EMACS=/usr/bin/emacs |
|
|
144 | # The following works for Emacs versions 18--23, don't change it. |
|
|
145 | EMACSFLAGS="-batch -q --no-site-file" |
|
|
146 | |
|
|
147 | # @FUNCTION: elisp-compile |
|
|
148 | # @USAGE: <list of elisp files> |
|
|
149 | # @DESCRIPTION: |
|
|
150 | # Byte-compile Emacs Lisp files. |
|
|
151 | |
114 | elisp-compile() { |
152 | elisp-compile() { |
115 | /usr/bin/emacs --batch -f batch-byte-compile --no-site-file --no-init-file $* |
153 | einfo "Compiling GNU Emacs Elisp files ..." |
|
|
154 | ${EMACS} ${EMACSFLAGS} -f batch-byte-compile "$@" |
116 | } |
155 | } |
117 | |
156 | |
|
|
157 | # @FUNCTION: elisp-comp |
|
|
158 | # @USAGE: <list of elisp files> |
|
|
159 | # @DESCRIPTION: |
|
|
160 | # Byte-compile interdependent Emacs Lisp files. |
|
|
161 | # |
|
|
162 | # This function byte-compiles all ".el" files which are part of its |
|
|
163 | # arguments, using GNU Emacs, and puts the resulting ".elc" files into the |
|
|
164 | # current directory, so disregarding the original directories used in ".el" |
|
|
165 | # arguments. |
|
|
166 | # |
|
|
167 | # This function manages in such a way that all Emacs Lisp files to be |
|
|
168 | # compiled are made visible between themselves, in the event they require or |
|
|
169 | # load one another. |
|
|
170 | |
|
|
171 | elisp-comp() { |
|
|
172 | # Copyright 1995 Free Software Foundation, Inc. |
|
|
173 | # François Pinard <pinard@iro.umontreal.ca>, 1995. |
|
|
174 | # Originally taken from GNU autotools. |
|
|
175 | |
|
|
176 | [ $# -gt 0 ] || return 1 |
|
|
177 | |
|
|
178 | einfo "Compiling GNU Emacs Elisp files ..." |
|
|
179 | |
|
|
180 | tempdir=elc.$$ |
|
|
181 | mkdir ${tempdir} |
|
|
182 | cp "$@" ${tempdir} |
|
|
183 | pushd ${tempdir} |
|
|
184 | |
|
|
185 | echo "(add-to-list 'load-path \"../\")" > script |
|
|
186 | ${EMACS} ${EMACSFLAGS} -l script -f batch-byte-compile *.el |
|
|
187 | local ret=$? |
|
|
188 | mv *.elc .. |
|
|
189 | |
|
|
190 | popd |
|
|
191 | rm -fr ${tempdir} |
|
|
192 | return ${ret} |
|
|
193 | } |
|
|
194 | |
|
|
195 | # @FUNCTION: elisp-emacs-version |
|
|
196 | # @DESCRIPTION: |
|
|
197 | # Output version of currently active Emacs. |
|
|
198 | |
|
|
199 | elisp-emacs-version() { |
|
|
200 | # The following will work for at least versions 18-23. |
|
|
201 | echo "(princ emacs-version)" >"${T}"/emacs-version.el |
|
|
202 | ${EMACS} ${EMACSFLAGS} -l "${T}"/emacs-version.el |
|
|
203 | } |
|
|
204 | |
|
|
205 | # @FUNCTION: elisp-make-autoload-file |
|
|
206 | # @USAGE: [output file] [list of directories] |
|
|
207 | # @DESCRIPTION: |
|
|
208 | # Generate a file with autoload definitions for the lisp functions. |
|
|
209 | |
118 | elisp-make-autoload-file () { |
210 | elisp-make-autoload-file() { |
119 | local f="${1:-${PN}-autoloads.el}" |
211 | local f="${1:-${PN}-autoloads.el}" |
120 | shift |
212 | shift |
121 | echo >"${f}" |
213 | einfo "Generating autoload file for GNU Emacs ..." |
122 | emacs --batch -q --no-site-file \ |
214 | |
|
|
215 | sed 's/^FF/\f/' >"${f}" <<-EOF |
|
|
216 | ;;; ${f##*/} --- autoloads for ${P} |
|
|
217 | |
|
|
218 | ;;; Commentary: |
|
|
219 | ;; Automatically generated by elisp-common.eclass |
|
|
220 | ;; DO NOT EDIT THIS FILE |
|
|
221 | |
|
|
222 | ;;; Code: |
|
|
223 | FF |
|
|
224 | ;; Local Variables: |
|
|
225 | ;; version-control: never |
|
|
226 | ;; no-byte-compile: t |
|
|
227 | ;; no-update-autoloads: t |
|
|
228 | ;; End: |
|
|
229 | ;;; ${f##*/} ends here |
|
|
230 | EOF |
|
|
231 | |
|
|
232 | ${EMACS} ${EMACSFLAGS} \ |
123 | --eval "(setq make-backup-files nil)" \ |
233 | --eval "(setq make-backup-files nil)" \ |
124 | --eval "(setq generated-autoload-file (expand-file-name \"${f}\"))" \ |
234 | --eval "(setq generated-autoload-file (expand-file-name \"${f}\"))" \ |
125 | -f batch-update-autoloads "${@-.}" |
235 | -f batch-update-autoloads "${@-.}" |
126 | } |
236 | } |
127 | |
237 | |
|
|
238 | # @FUNCTION: elisp-install |
|
|
239 | # @USAGE: <subdirectory> <list of files> |
|
|
240 | # @DESCRIPTION: |
|
|
241 | # Install files in SITELISP directory. |
|
|
242 | |
128 | elisp-install() { |
243 | elisp-install() { |
129 | local subdir=$1 |
244 | local subdir="$1" |
130 | dodir "${SITELISP}/${subdir}" |
|
|
131 | insinto "${SITELISP}/${subdir}" |
|
|
132 | shift |
245 | shift |
|
|
246 | einfo "Installing Elisp files for GNU Emacs support ..." |
|
|
247 | ( # subshell to avoid pollution of calling environment |
|
|
248 | insinto "${SITELISP}/${subdir}" |
133 | doins $@ |
249 | doins "$@" |
|
|
250 | ) |
134 | } |
251 | } |
|
|
252 | |
|
|
253 | # @FUNCTION: elisp-site-file-install |
|
|
254 | # @USAGE: <site-init file> [subdirectory] |
|
|
255 | # @DESCRIPTION: |
|
|
256 | # Install Emacs site-init file in SITELISP directory. |
135 | |
257 | |
136 | elisp-site-file-install() { |
258 | elisp-site-file-install() { |
137 | local sitefile=$1 my_pn=${2:-${PN}} |
259 | local sf="$1" my_pn="${2:-${PN}}" |
138 | pushd "${S}" |
260 | einfo "Installing site initialisation file for GNU Emacs ..." |
139 | cp ${sitefile} "${T}" |
261 | cp "${sf}" "${T}" |
140 | sed -i "s:@SITELISP@:${SITELISP}/${my_pn}:g" "${T}/$(basename ${sitefile})" |
262 | sed -i -e "s:@SITELISP@:${SITELISP}/${my_pn}:g" \ |
|
|
263 | -e "s:@SITEETC@:${SITEETC}/${my_pn}:g" "${T}/${sf##*/}" |
|
|
264 | ( # subshell to avoid pollution of calling environment |
141 | insinto ${SITELISP} |
265 | insinto "${SITELISP}" |
142 | doins "${T}/$(basename ${sitefile})" || die "failed to install site file" |
266 | doins "${T}/${sf##*/}" |
143 | popd |
267 | ) |
144 | } |
268 | } |
|
|
269 | |
|
|
270 | # @FUNCTION: elisp-site-regen |
|
|
271 | # @DESCRIPTION: |
|
|
272 | # Regenerate site-gentoo.el file. |
145 | |
273 | |
146 | elisp-site-regen() { |
274 | elisp-site-regen() { |
|
|
275 | local sflist sf line |
|
|
276 | |
|
|
277 | if [ ! -e "${ROOT}${SITELISP}"/site-gentoo.el ] \ |
|
|
278 | && [ ! -e "${ROOT}${SITELISP}"/site-start.el ]; then |
|
|
279 | einfo "Creating default ${SITELISP}/site-start.el ..." |
|
|
280 | cat <<-EOF >"${T}"/site-start.el |
|
|
281 | ;;; site-start.el |
|
|
282 | |
|
|
283 | ;;; Commentary: |
|
|
284 | ;; This default site startup file is installed by elisp-common.eclass. |
|
|
285 | ;; You may replace this file by your own site initialisation, or even |
|
|
286 | ;; remove it completely; it will not be recreated. |
|
|
287 | |
|
|
288 | ;;; Code: |
|
|
289 | ;; Load site initialisation for Gentoo-installed packages. |
|
|
290 | (require 'site-gentoo) |
|
|
291 | |
|
|
292 | ;;; site-start.el ends here |
|
|
293 | EOF |
|
|
294 | fi |
|
|
295 | |
147 | einfo "Regenerating ${SITELISP}/site-gentoo.el ..." |
296 | einfon "Regenerating ${SITELISP}/site-gentoo.el ..." |
148 | einfo "" |
|
|
149 | cat <<EOF >${ROOT}${SITELISP}/site-gentoo.el |
297 | cat <<-EOF >"${T}"/site-gentoo.el |
150 | ;;; DO NOT EDIT THIS FILE -- IT IS GENERATED AUTOMATICALLY BY PORTAGE |
298 | ;;; site-gentoo.el --- site initialisation for Gentoo-installed packages |
151 | ;;; ----------------------------------------------------------------- |
|
|
152 | |
299 | |
|
|
300 | ;;; Commentary: |
|
|
301 | ;; Automatically generated by elisp-common.eclass |
|
|
302 | ;; DO NOT EDIT THIS FILE |
|
|
303 | |
|
|
304 | ;;; Code: |
153 | EOF |
305 | EOF |
|
|
306 | |
154 | for sf in ${ROOT}${SITELISP}/[0-9][0-9]*-gentoo.el |
307 | for sf in "${ROOT}${SITELISP}"/[0-9][0-9]*-gentoo.el |
155 | do |
308 | do |
156 | [ -r "${sf}" ] || continue |
309 | [ -r "${sf}" ] || continue |
157 | einfo " Adding $(basename ${sf}) ..." |
310 | sflist="${sflist} ${sf##*/}" |
158 | cat "${sf}" >>${ROOT}${SITELISP}/site-gentoo.el |
311 | cat "${sf}" >>"${T}"/site-gentoo.el |
159 | done |
312 | done |
|
|
313 | |
|
|
314 | cat <<-EOF >>"${T}"/site-gentoo.el |
|
|
315 | |
|
|
316 | (provide 'site-gentoo) |
|
|
317 | |
|
|
318 | ;; Local Variables: |
|
|
319 | ;; no-byte-compile: t |
|
|
320 | ;; End: |
|
|
321 | ;;; site-gentoo.el ends here |
|
|
322 | EOF |
|
|
323 | |
|
|
324 | if cmp -s "${ROOT}${SITELISP}"/site-gentoo.el "${T}"/site-gentoo.el; then |
|
|
325 | # This prevents outputting unnecessary text when there |
|
|
326 | # was actually no change. |
|
|
327 | # A case is a remerge where we have doubled output. |
|
|
328 | echo " no changes." |
|
|
329 | else |
|
|
330 | mv "${T}"/site-gentoo.el "${ROOT}${SITELISP}"/site-gentoo.el |
|
|
331 | [ -f "${T}"/site-start.el ] \ |
|
|
332 | && [ ! -e "${ROOT}${SITELISP}"/site-start.el ] \ |
|
|
333 | && mv "${T}"/site-start.el "${ROOT}${SITELISP}"/site-start.el |
|
|
334 | echo; einfo |
|
|
335 | for sf in ${sflist}; do |
|
|
336 | einfo " Adding ${sf} ..." |
|
|
337 | done |
160 | while read line; do einfo "${line}"; done <<EOF |
338 | while read line; do einfo "${line}"; done <<EOF |
161 | |
339 | |
162 | All site initialization for Gentoo-installed packages is now added to |
340 | All site initialisation for Gentoo-installed packages is added to |
163 | /usr/share/emacs/site-lisp/site-gentoo.el; site-start.el is no longer |
341 | /usr/share/emacs/site-lisp/site-gentoo.el; site-start.el is no longer |
164 | managed by Gentoo. You are responsible for all maintenance of |
342 | managed by Gentoo. You are responsible for all maintenance of |
165 | site-start.el if there is such a file. |
343 | site-start.el if there is such a file. |
166 | |
344 | |
167 | In order for this site initialization to be loaded for all users |
345 | In order for this site initialisation to be loaded for all users |
168 | automatically, as was done previously, you can add a line like this: |
346 | automatically, you can add a line like this: |
169 | |
347 | |
170 | (load "/usr/share/emacs/site-lisp/site-gentoo" nil t) |
348 | (require 'site-gentoo) |
171 | |
349 | |
172 | to /usr/share/emacs/site-lisp/site-start.el. Alternatively, that line |
350 | to /usr/share/emacs/site-lisp/site-start.el. Alternatively, that line |
173 | can be added by individual users to their initialization files, or for |
351 | can be added by individual users to their initialisation files, or, |
174 | greater flexibility, users can select which of the package-specific |
352 | for greater flexibility, users can load individual package-specific |
175 | initialization files in /usr/share/emacs/site-lisp to load. |
353 | initialisation files from /usr/share/emacs/site-lisp/. |
176 | EOF |
354 | EOF |
177 | echo |
355 | echo |
178 | } |
|
|
179 | |
|
|
180 | # The following Emacs Lisp compilation routine is taken from GNU |
|
|
181 | # autotools. |
|
|
182 | |
|
|
183 | elisp-comp() { |
|
|
184 | # Copyright 1995 Free Software Foundation, Inc. |
|
|
185 | # François Pinard <pinard@iro.umontreal.ca>, 1995. |
|
|
186 | # This script byte-compiles all `.el' files which are part of its |
|
|
187 | # arguments, using GNU Emacs, and put the resulting `.elc' files into |
|
|
188 | # the current directory, so disregarding the original directories used |
|
|
189 | # in `.el' arguments. |
|
|
190 | # |
|
|
191 | # This script manages in such a way that all Emacs LISP files to |
|
|
192 | # be compiled are made visible between themselves, in the event |
|
|
193 | # they require or load-library one another. |
|
|
194 | |
|
|
195 | if test $# = 0; then |
|
|
196 | exit 1 |
|
|
197 | else |
|
|
198 | if test -z "${EMACS}" || test "${EMACS}" = "t"; then |
|
|
199 | # Value of "t" means we are running in a shell under Emacs. |
|
|
200 | # Just assume Emacs is called "emacs". |
|
|
201 | EMACS=emacs |
|
|
202 | fi |
|
|
203 | |
|
|
204 | tempdir=elc.$$ |
|
|
205 | mkdir ${tempdir} |
|
|
206 | cp $* ${tempdir} |
|
|
207 | cd ${tempdir} |
|
|
208 | |
|
|
209 | echo "(add-to-list 'load-path \"../\")" > script |
|
|
210 | ${EMACS} -batch -q --no-site-file --no-init-file -l script -f batch-byte-compile *.el |
|
|
211 | mv *.elc .. |
|
|
212 | |
|
|
213 | cd .. |
|
|
214 | rm -fr ${tempdir} |
|
|
215 | fi |
356 | fi |
216 | } |
357 | } |