Mercurial > hgrepos > hgweb.cgi > after5
comparison after5.rb @ 93:8ea193772cbd draft
ruby21
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Sun, 13 Jul 2014 09:12:23 +0900 |
parents | 52a3c4444a4c |
children | 568f4c467966 |
comparison
equal
deleted
inserted
replaced
92:52a3c4444a4c | 93:8ea193772cbd |
---|---|
1 #!/usr/local/bin/ruby20 | 1 #!/usr/local/bin/ruby21 |
2 # -*- coding: euc-jp -*- | 2 # -*- coding: euc-jp -*- |
3 # | 3 # |
4 # Associative Scheduling Table - after5 | 4 # Associative Scheduling Table - after5 |
5 # (C)2003, 2004, 2006, 2008, 2012, 2013 by HIROSE Yuuji [yuuji<at>gentei.org] | 5 # (C)2003, 2004, 2006, 2008, 2012-2014 by HIROSE Yuuji [yuuji<at>gentei.org] |
6 # $Id: after5.rb,v 1.20 2012/12/03 15:54:20 yuuji Exp $ | 6 # $Id: after5.rb,v 1.20 2012/12/03 15:54:20 yuuji Exp $ |
7 # Last modified Thu Feb 20 12:49:36 2014 on firestorm | 7 # Last modified Sun Jul 13 09:11:49 2014 on firestorm |
8 # See http://www.gentei.org/~yuuji/software/after5/ | 8 # See http://www.gentei.org/~yuuji/software/after5/ |
9 # このスクリプトはEUCで保存してください。 | 9 # このスクリプトはEUCで保存してください。 |
10 $hgid = <<_HGID_.split[1..-2].join(" ") | 10 $hgid = <<_HGID_.split[1..-2].join(" ") |
11 $HGid$ | 11 $HGid$ |
12 _HGID_ | 12 _HGID_ |
1598 @opt['url'], ENV['REMOTE_ADDR'], user)) | 1598 @opt['url'], ENV['REMOTE_ADDR'], user)) |
1599 sendMail(email, "#{@mybase} new account", | 1599 sendMail(email, "#{@mybase} new account", |
1600 sprintf(msg('accessfrom'), ENV['REMOTE_ADDR']) + | 1600 sprintf(msg('accessfrom'), ENV['REMOTE_ADDR']) + |
1601 sprintf(@opt['url']) + "\n" + | 1601 sprintf(@opt['url']) + "\n" + |
1602 sprintf(msg('newpassword'), user, newp) + | 1602 sprintf(msg('newpassword'), user, newp) + |
1603 sprintf(msg('mischief'))) | 1603 sprintf("%s\n", msg('mischief'))) |
1604 @O.print @H.p(sprintf(msg('newaccount'), user)) | 1604 @O.print @H.p(sprintf(msg('newaccount'), user)) |
1605 @O.print @H.p(@H.a(@myname, msg('login'))) | 1605 @O.print @H.p(@H.a(@myname, msg('login'))) |
1606 throw :auth, nil | 1606 throw :auth, nil |
1607 else | 1607 else |
1608 outputError(msg('pswderror')) | 1608 outputError(msg('pswderror')) |