changeset 12:d7c978950000 draft

RCS-revision 1.13 date: 2004/02/26 16:30:06; author: yuuji; state: Exp; lines: +4 -4 in mkusermap(), allow 0-9 for email addresses
author HIROSE Yuuji <yuuji@gentei.org>
date Thu, 26 Feb 2004 16:30:06 +0859
parents 84d3608bb529
children d2c36cb4206a
files after5.rb
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/after5.rb	Sun Feb 15 13:01:52 2004 +0859
+++ b/after5.rb	Thu Feb 26 16:30:06 2004 +0859
@@ -2,8 +2,8 @@
 #
 # Associative Scheduling Table - after5
 # (C)2003, 2004 by HIROSE Yuuji [yuuji@gentei.org]
-# $Id: after5.rb,v 1.12 2004/02/15 13:01:52 yuuji Exp $
-# Last modified Sat Feb 14 22:33:40 2004 on firestorm
+# $Id: after5.rb,v 1.13 2004/02/26 16:30:06 yuuji Exp $
+# Last modified Fri Feb 27 01:29:12 2004 on firestorm
 # See http://www.gentei.org/~yuuji/software/after5/
 # このスクリプトはEUCで保存してください。
 
@@ -189,7 +189,7 @@
       next if /^\./ =~ u
       newu = ''
       u.split('').each{|c|	# for security wrapping
-	newu << c[0].chr if %r,[-A-Z/+_.@],i =~ c
+	newu << c[0].chr if %r,[-A-Z0-9/+_.@],i =~ c
       }
       u = newu
       map[u] = {}
@@ -197,7 +197,7 @@
       next unless test(?d, d)
       Dir.foreach(d){|attr|
 	next if /^\./ =~ attr
-	attr.untaint if /^[A-Za-z]+$/ =~ attr
+	attr.untaint if /^[A-Z_][-A-Z_0-9]*$/i =~ attr
 	file = File.join(@usermapdir, u, attr)
 	next unless test(?s, file) && test(?r, file)
 	map[u][attr] = IO.readlines(file).join().strip

yatex.org