[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index][Search]
Re: Emacspeak with the Accent SA
- To: luig@xxxxxxxxxxx
- Subject: Re: Emacspeak with the Accent SA
- From: "James R. Van Zandt" <jrv@xxxxxxxxxxx>
- Date: Wed, 22 Sep 1999 20:31:48 -0400 (EDT)
- CC: emacspeak@xxxxxxxxxxx
- In-reply-to: <002401bf0507$6884b220$ba9eb8a1@xxxxxxxxxxx> (message fromLui Greco on Wed, 22 Sep 1999 08:31:21 -0600)
- Old-Return-Path: <jrv@xxxxxxxxxxx>
- Resent-Date: Wed, 22 Sep 1999 21:56:48 -0400 (EDT)
- Resent-From: emacspeak@xxxxxxxxxxx
- Resent-Message-ID: <"0KaKUB.A.f-.MjY63"@hub>
- Resent-Sender: emacspeak-request@xxxxxxxxxxx
Lui -
The error message you report, "Process speaker not running", could be
due to many things. Attached is a script "testit" which checks your
setup. Please check that "strace" is installed on your system, then
execute the script and mail me the file log.tcl which it should
create.
- Jim Van Zandt
#!/bin/sh
rm -f log*
date >log.tcl
uname -a >>log.tcl
echo >>log.tcl
echo "----- device files" >>log.tcl
ls -l /dev/ttyS? /dev/dtlk /dev/audio* >>log.tcl 2>&1
echo "current user is `whoami`, who is a member of these groups: `groups`" >>log.tcl
echo >>log.tcl
efile=`which emacs`
echo "----- \"which emacs\" = $efile" >>log.tcl
emacs --version | head -1 >>log.tcl
echo >>log.tcl
efile=`which emacspeak`
echo "----- \"which emacspeak\" = $efile" >>log.tcl
head -25 $efile >>log.tcl
echo >>log.tcl
echo "----- exported Emacspeak environment variables" >>log.tcl
set | egrep '(EMAC|DTK)' >>log.tcl
if [ -f /etc/emacspeak.conf ]; then
echo >>log.tcl
echo "----- /etc/emacspeak.conf" >>log.tcl
cat /etc/emacspeak.conf >>log.tcl;
fi
echo >>log.tcl
efile=`which strace`
echo "----- \"which strace\" = $efile" >>log.tcl
if [ "$efile" == "" ]; then
echo "strace not installed" >>log.tcl
echo "please install strace before running testit"
exit 1
fi
strace -V >>log.tcl
strace -o log -ff -r -t -s 120 emacspeak all.in
file=`grep -l 'execve.*tcl.*tcl' log.* | head -1`
awk '/open.*emacspeak/{sub(/^.*\(\"/,"");sub(/\".*$/,"");print}' $file
tfile=`awk '/open.*emacspeak/{sub(/^.*\(\"/,"");sub(/\".*$/,"");print}' $file`
echo >>log.tcl
echo "----- $tfile" >>log.tcl
grep '\$Id' $tfile >>log.tcl
echo >>log.tcl
echo "----- $file" >>log.tcl
grep execve $file >>log.tcl
echo "..." >>log.tcl
#egrep '(read|write|select)' $file |tail -500 >>log.tcl
tail -500 $file >>log.tcl
if grep -q 'execve.*ping-apollo' log.*; then
file=`grep -l 'execve.*ping-apollo' log.* | tail -1`
echo "----- $file" >>log.tcl
tail -500 $file >>log.tcl
fi
echo the Tcl process log $file is summarized in log.tcl
-----------------------------------------------------------------------------
To unsubscribe or change your address send mail to
"emacspeak-request@xxxxxxxxxxx" with a subject of "unsubscribe" or "help"
Emacspeak Files |
Subscribe |
Unsubscribe