diff --git a/ChangeLog b/ChangeLog
index 01599b9bac..18e648b2d8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+Sat Jan 28 07:49:30 2006  Hirokazu Yamamoto  <ocean@m2.ccsnet.ne.jp>
+
+	* lib/rdoc/usage.rb: support "a:0:33" style caller[-1]. In this case
+	  file name is "a:0". I don't know this really happens though...
+	  [ruby-Bugs:3344]
+
 Thu Jan 26 15:55:52 2006  Yukihiro Matsumoto  <matz@ruby-lang.org>
 
 	* ext/socket/socket.c: turn on do_not_reverse_lookup by default. 
diff --git a/lib/rdoc/usage.rb b/lib/rdoc/usage.rb
index 08393c380b..def516b3d7 100644
--- a/lib/rdoc/usage.rb
+++ b/lib/rdoc/usage.rb
@@ -96,7 +96,7 @@ module RDoc
 
   # Display usage
   def RDoc.usage_no_exit(*args)
-    main_program_file, = caller[-1].split(/:\d+/, 2)
+    main_program_file = caller[-1].sub(/:\d+$/, '')
     comment = File.open(main_program_file) do |file|
       find_comment(file)
     end