[15428] in Athena Bugs
sun4 8.1.9: xess
daemon@ATHENA.MIT.EDU (Jacob Morzinski)
Sun Aug 24 21:02:09 1997
To: bugs@MIT.EDU
Date: Sun, 24 Aug 1997 21:02:02 EDT
From: "Jacob Morzinski" <jmorzins@MIT.EDU>
System name: bobbi-harlow
Type and version: SPARC/4 8.1.9
Display type: cgthree
What were you trying to do?
Start xess
What's wrong:
The xess wrapper script does not run under perl5. (It fails
to compile; it uses unescaped '@'s inside double-quotes.)
What should have happened:
The script should use a backslash to esacpe special meaning
of the '@' characters.
Please describe any relevant documentation references:
The perl manpages merely say that "the usual" baskslash
rules apply to espacing special characters within
double-quoted context; they don't contain an explicit
statement about the treatment of '@' characters.
Nevertheless, if we hope to be able to upgrade Athena to
Perl5 eventually, it'd be a good idea to fix things like
this early.
A patch is included.
Sincerely,
--
Jacob Morzinski jmorzins@mit.edu
===========================================================================
--- /mit/xess/bin/xess Fri Aug 22 13:47:28 1997
+++ /tmp/xess Sun Aug 24 20:59:37 1997
@@ -31,8 +31,8 @@
$swtoolsDir="/afs/athena/software/swtools";
&send_message($cookie, $message);
-$cookie = "xess_3.1_@cellref";
-$message = "${msg_dir}/@cellref";
+$cookie = "xess_3.1_\@cellref";
+$message = "${msg_dir}/\@cellref";
&send_message($cookie, $message);
$version_locker = "/mit/${sw_version}";
===========================================================================
