/usr/share/bug/auctex/script is in auctex 11.87-1ubuntu2.
This file is owned by root:root, with mode 0o755.
The actual contents of the file can be viewed below.
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 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 | #! /bin/bash
#
# bug reporting script for the Debian auctex package
#
# Copyright (C) 1997, 98, 99, 2000, 01, 02, 03, 04, 05, 06, 07, 08, 09, 10,
# 11, 12 Davide G. M. Salvetti.
#
# This program is free software; you can redistribute it and/or modify it
# under the terms of the GNU General Public License as published by the
# Free Software Foundation; either version 3 of the License, or (at your
# option) any later version.
#
# This program is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program. If not, see <http://www.gnu.org/licenses/>.
#
# On Debian GNU/Linux System you can find a copy of the GNU General Public
# License in "/usr/share/common-licenses/GPL".
set -e
EMACS_COMMAND='
(let ((start "Emacs")
(stop "\n-- \n"))
(TeX-submit-bug-report)
(let ((a (search-forward start nil t))
(b (search-forward stop nil t)))
(princ (concat
(buffer-substring
(if a (- a (length start)) (point))
(if b (- b (length stop)) (point-max)))))))'
cat >&3 <<EOF
========================================================================
Content of '/usr/share/emacs/site-lisp/auctex'
------------------------------------------------------------------------
EOF
find 2>/dev/null /usr/share/emacs/site-lisp/auctex -type f -print0 \
| xargs --null --no-run-if-empty md5sum | sort --key=2,2 >&3
cat >&3 <<EOF
------------------------------------------------------------------------
EOF
FLAVORS=${*:-"emacs23 emacs24 emacs-snapshot"}
for FLAVOR in ${FLAVORS}; do
if [ -x /usr/bin/${FLAVOR} ]; then
cat >&3 <<EOF
Collecting package info for Emacs flavor '${FLAVOR}':
------------------------------------------------------------------------
EOF
${FLAVOR} </dev/null 2>/dev/null >&3 \
--no-site-file --no-init-file --batch \
--eval "(require 'tex-site)" --eval "$EMACS_COMMAND"
cat >&3 <<EOF
------------------------------------------------------------------------
Collecting system info for Emacs flavor '${FLAVOR}':
------------------------------------------------------------------------
EOF
${FLAVOR} </dev/null 2>/dev/null >&3 \
--no-init-file --batch --eval "$EMACS_COMMAND"
cat >&3 <<EOF
------------------------------------------------------------------------
Collecting user info for Emacs flavor '${FLAVOR}':
------------------------------------------------------------------------
EOF
${FLAVOR} </dev/null 2>/dev/null >&3 \
--batch --eval "$EMACS_COMMAND"
cat >&3 <<EOF
------------------------------------------------------------------------
Content of '/usr/share/${FLAVOR}/site-lisp/auctex'
------------------------------------------------------------------------
EOF
command ls >&3 --almost-all --sort=version --format=long \
/usr/share/${FLAVOR}/site-lisp/auctex
LOG=$(ls /usr/share/${FLAVOR}/site-lisp/auctex/CompilationLog*)
cat >&3 <<EOF
------------------------------------------------------------------------
Content of '${LOG}':
------------------------------------------------------------------------
EOF
case ${LOG} in
(*.gz) zcat >&3 ${LOG} ;;
(*) cat >&3 ${LOG} ;;
esac
cat >&3 <<EOF
========================================================================
EOF
fi
done
|