Mercurial > hgrepos > hgweb.cgi > after5
changeset 1:8145b15d3d6f draft
RCS-revision 1.2
date: 2003/12/29 17:01:20; author: yuuji; state: Exp; lines: +5 -5
*** empty log message ***
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Mon, 29 Dec 2003 17:01:20 +0859 |
parents | 8f811f47ac60 |
children | 1110baebe9a9 |
files | after5.rb |
diffstat | 1 files changed, 5 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/after5.rb Mon Dec 29 16:05:57 2003 +0859 +++ b/after5.rb Mon Dec 29 17:01:20 2003 +0859 @@ -2,8 +2,8 @@ # # Associative Scheduling Table - after5 # (C)2003 by HIROSE Yuuji [yuuji@gentei.org] -# $Id: after5.rb,v 1.1 2003/12/29 16:05:57 yuuji Exp $ -# Last modified Tue Dec 30 00:46:49 2003 on firestorm +# $Id: after5.rb,v 1.2 2003/12/29 17:01:20 yuuji Exp $ +# Last modified Tue Dec 30 01:48:15 2003 on firestorm # See http://www.gentei.org/~yuuji/software/after5/ # このスクリプトはEUCで保存してください。 @@ -868,11 +868,11 @@ def initialize() @me = File.expand_path($0) @mydir, @myname = File.dirname(@me), File.basename(@me) + @mybase = @myname.sub(/\.\w+$/, '') @mydir.untaint + @mybase.untaint Dir.chdir @mydir - # @mybase = @myname.sub(/\.\w+$/, '') - @mybase = "after5" ########################################### secure? - @myname='a5.cgi' # if test(?f, File.join(@mydir, "a5.cgi")) + @myname='a5.cgi' if test(?f, "a5.cgi") @conf = nil @schedulearea = {'rows'=>'4', 'cols'=>'60', 'name'=>'schedule'} @oldagent = (%r,Mozilla/4, =~ ENV['HTTP_USER_AGENT'])