1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
|
#! /bin/sh -e
# /usr/lib/emacsen-common/packages/install/t-code
# Written by Jim Van Zandt <jrv@vanzandt.mv.com>, borrowing heavily
# from the install scripts for gettext by Santiago Vila
# <sanvila@ctv.es> and octave by Dirk Eddelbuettel <edd@debian.org>.
FLAVOR=$1
PACKAGE=t-code
if [ ${FLAVOR} = emacs ]; then exit 0; fi
echo install/${PACKAGE}: Handling install for emacsen flavor ${FLAVOR}
FLAVORTEST=`echo $FLAVOR | cut -c-6`
if [ ${FLAVORTEST} = xemacs ] ; then
SITEFLAG="-no-site-file"
else
SITEFLAG="--no-site-file"
fi
FLAGS="${SITEFLAG} -q -batch -l make-elc.el -f batch-byte-compile"
ELDIR=/usr/share/emacs/site-lisp/${PACKAGE}
ELCDIR=/usr/share/${FLAVOR}/site-lisp/${PACKAGE}
# Install-info-altdir does not actually exist.
# Maybe somebody will write it.
#if test -x /usr/sbin/install-info-altdir; then
# echo install/${PACKAGE}: install Info links for ${FLAVOR}
# install-info-altdir --quiet --section "" "" --dirname=${FLAVOR} /usr/info/${PACKAGE}.info.gz
#fi
install -m 755 -d ${ELCDIR}
cd ${ELDIR}
FILES=`echo *.el`
cp ${FILES} ${ELCDIR}
cd ${ELCDIR}
cat << EOF > make-elc.el
(setq load-path (cons "." load-path) byte-compile-warnings nil)
(load "tc-sysdep.el")
(and (fboundp 'set-language-environment)
(set-language-environment "Japanese"))
EOF
${FLAVOR} ${FLAGS} ${FILES}
rm -f *.el make-elc.el
exit 0
|
