[ruby-dev:21608] debug.rb for Meadow.

新井です。

Meadow では、環境変数 EMACS が "meadow" として割り当てられて、
debug.rb がうまく動かないようです。

% meadow --version
GNU Emacs 21.1.1
Copyright (C) 2001 Free Software Foundation, Inc.
GNU Emacs comes with ABSOLUTELY NO WARRANTY.
You may redistribute copies of Emacs
under the terms of the GNU General Public License.
For more information about these matters, see the file named COPYING.

% meadow -q --batch --eval '(message (getenv "EMACS"))'
meadow

まだ、他にもおかしなところがありそうですがとりあえずパッチ。


Index: ChangeLog
===================================================================
RCS file: /usr/local/share/cvsup/ruby/ruby/ChangeLog,v
retrieving revision 1.2300
diff -u -r1.2300 ChangeLog
--- ChangeLog	9 Oct 2003 22:50:57 -0000	1.2300
+++ ChangeLog	13 Oct 2003 10:56:25 -0000
@@ -1,3 +1,9 @@
+Mon Oct 13 19:51:02 2003  Koji Arai  <[e-mail]>
+
+	* lib/debug.rb (debug_command): should enter emacs mode when
+	  assigned any value to the environment variable "EMACS".
+	  On Meadow, (getenv "EMACS") is "meadow".
+
 Fri Oct 10 07:50:54 2003  Nobuyoshi Nakada  <[e-mail]>
 
 	* eval.c (is_defined): inheritance line adjustment as like as

Index: lib/debug.rb
===================================================================
RCS file: /usr/local/share/cvsup/ruby/ruby/lib/debug.rb,v
retrieving revision 1.47
diff -u -r1.47 debug.rb
--- lib/debug.rb	11 Aug 2003 13:41:18 -0000	1.47
+++ lib/debug.rb	13 Oct 2003 10:45:38 -0000
@@ -261,7 +261,7 @@
     binding_file = file
     binding_line = line
     previous_line = nil
-    if (ENV['EMACS'] == 't')
+    if ENV['EMACS']
       stdout.printf "\032\032%s:%d:\n", binding_file, binding_line
     else
       stdout.printf "%s:%d:%s", binding_file, binding_line,

--
新井康司 (Koji Arai)