# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1076222661 -32378
# Node ID b2f1a9482975d724435a7faca685d8ec7f7463b7
# Parent  fbe1de450bd77f31f8067b0e38a55979a9d7e674
RCS-revision 1.11
date: 2004/02/08 15:43:59;  author: yuuji;  state: Exp;  lines: +5 -4
Do not canonify notify_list file name to avoid error on old format file.

diff -r fbe1de450bd7 -r b2f1a9482975 after5.rb
--- a/after5.rb	Tue Jan 20 17:21:36 2004 +0859
+++ b/after5.rb	Sun Feb 08 15:43:59 2004 +0859
@@ -2,8 +2,8 @@
 #
 # Associative Scheduling Table - after5
 # (C)2003, 2004 by HIROSE Yuuji [yuuji@gentei.org]
-# $Id: after5.rb,v 1.10 2004/01/20 17:21:36 yuuji Exp $
-# Last modified Wed Jan 21 02:19:14 2004 on firestorm
+# $Id: after5.rb,v 1.11 2004/02/08 15:43:59 yuuji Exp $
+# Last modified Mon Feb  9 00:33:48 2004 on firestorm
 # See http://www.gentei.org/~yuuji/software/after5/
 # このスクリプトはEUCで保存してください。
 
@@ -651,8 +651,9 @@
     return ntl unless test(?d, @crondir)
     Dir.foreach(@crondir){|datedir|
       next unless /(\d\d\d\d+)-(\d+)-(\d+)-(\d\d\d\d)/ =~ datedir
-      datedir = sprintf("%04d-%02d-%02d-%04d",
-			$1.to_i, $2.to_i, $3.to_i, $4.to_i)
+      ##datedir = sprintf("%04d-%02d-%02d-%04d",
+      ## $1.to_i, $2.to_i, $3.to_i, $4.to_i)
+      datedir.untaint
       dd = File.join(@crondir, datedir)
       next unless test(?d, dd)
       y, m, d, hm = $1.to_i, $2.to_i, $3.to_i, $4.to_i