/[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.61 Revision 1.62
1# Copyright 1999-2009 Gentoo Foundation 1# Copyright 1999-2009 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.61 2009/05/25 16:25:32 fauli Exp $ 3# $Header: /var/cvsroot/gentoo-x86/eclass/elisp-common.eclass,v 1.62 2009/10/08 10:50:35 ulm Exp $
4# 4#
5# Copyright 2002-2004 Matthew Kennedy <mkennedy@gentoo.org> 5# Copyright 2002-2004 Matthew Kennedy <mkennedy@gentoo.org>
6# Copyright 2003 Jeremy Maitin-Shepard <jbms@attbi.com> 6# Copyright 2003 Jeremy Maitin-Shepard <jbms@attbi.com>
7# Copyright 2004-2005 Mamoru Komachi <usata@gentoo.org> 7# Copyright 2004-2005 Mamoru Komachi <usata@gentoo.org>
8# Copyright 2007-2008 Christian Faulhammer <fauli@gentoo.org> 8# Copyright 2007-2008 Christian Faulhammer <fauli@gentoo.org>
194# @USAGE: [output file] [list of directories] 194# @USAGE: [output file] [list of directories]
195# @DESCRIPTION: 195# @DESCRIPTION:
196# Generate a file with autoload definitions for the lisp functions. 196# Generate a file with autoload definitions for the lisp functions.
197 197
198elisp-make-autoload-file() { 198elisp-make-autoload-file() {
199 local f="${1:-${PN}-autoloads.el}" 199 local f="${1:-${PN}-autoloads.el}" null="" page=$'\f'
200 shift 200 shift
201 ebegin "Generating autoload file for GNU Emacs" 201 ebegin "Generating autoload file for GNU Emacs"
202 202
203 sed 's/^FF/\f/' >"${f}" <<-EOF 203 cat >"${f}" <<-EOF
204 ;;; ${f##*/} --- autoloads for ${P} 204 ;;; ${f##*/} --- autoloads for ${P}
205 205
206 ;;; Commentary: 206 ;;; Commentary:
207 ;; Automatically generated by elisp-common.eclass 207 ;; Automatically generated by elisp-common.eclass
208 ;; DO NOT EDIT THIS FILE 208 ;; DO NOT EDIT THIS FILE
209 209
210 ;;; Code: 210 ;;; Code:
211 FF 211 ${page}
212 ;; Local Variables: 212 ;; Local ${null}Variables:
213 ;; version-control: never 213 ;; version-control: never
214 ;; no-byte-compile: t 214 ;; no-byte-compile: t
215 ;; no-update-autoloads: t 215 ;; no-update-autoloads: t
216 ;; End: 216 ;; End:
217
217 ;;; ${f##*/} ends here 218 ;;; ${f##*/} ends here
218 EOF 219 EOF
219 220
220 ${EMACS} ${EMACSFLAGS} \ 221 ${EMACS} ${EMACSFLAGS} \
221 --eval "(setq make-backup-files nil)" \ 222 --eval "(setq make-backup-files nil)" \
280# Note: Before December 2007, site initialisation files were installed 281# Note: Before December 2007, site initialisation files were installed
281# in /usr/share/emacs/site-lisp/. For backwards compatibility, this 282# in /usr/share/emacs/site-lisp/. For backwards compatibility, this
282# location is still supported when generating site-gentoo.el. 283# location is still supported when generating site-gentoo.el.
283 284
284elisp-site-regen() { 285elisp-site-regen() {
285 local i sf line obsolete 286 local i sf line obsolete null="" page=$'\f'
286 local -a sflist 287 local -a sflist
287 288
288 if [ ! -d "${ROOT}${SITELISP}" ]; then 289 if [ ! -d "${ROOT}${SITELISP}" ]; then
289 eerror "elisp-site-regen: Directory ${SITELISP} does not exist" 290 eerror "elisp-site-regen: Directory ${SITELISP} does not exist"
290 return 1 291 return 1
334 sed '$q' "${sflist[@]}" </dev/null >>"${T}"/site-gentoo.el 335 sed '$q' "${sflist[@]}" </dev/null >>"${T}"/site-gentoo.el
335 cat <<-EOF >>"${T}"/site-gentoo.el 336 cat <<-EOF >>"${T}"/site-gentoo.el
336 337
337 (provide 'site-gentoo) 338 (provide 'site-gentoo)
338 339
340 ${page}
339 ;; Local Variables: 341 ;; Local ${null}Variables:
340 ;; no-byte-compile: t 342 ;; no-byte-compile: t
343 ;; buffer-read-only: t
341 ;; End: 344 ;; End:
345
342 ;;; site-gentoo.el ends here 346 ;;; site-gentoo.el ends here
343 EOF 347 EOF
344 348
345 if cmp -s "${ROOT}${SITELISP}"/site-gentoo.el "${T}"/site-gentoo.el 349 if cmp -s "${ROOT}${SITELISP}"/site-gentoo.el "${T}"/site-gentoo.el
346 then 350 then

Legend:
Removed from v.1.61  
changed lines
  Added in v.1.62

  ViewVC Help
Powered by ViewVC 1.1.20