Mercurial > hgrepos > hgweb.cgi > after5

comparison after5.rb @ 104:02e452079659 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Supply maintainer's name to :mischief message with sprintf
author HIROSE Yuuji <yuuji@gentei.org>
date Thu, 19 Nov 2020 19:42:29 +0900
parents 734bfd8cbdc6
children 6455a0438570
comparison
equal deleted inserted replaced
103:734bfd8cbdc6 104:02e452079659
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-2020 by HIROSE Yuuji [yuuji<at>gentei.org] 5 # (C)2003, 2004, 2006, 2008, 2012-2020 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 Oct 8 11:06:06 2020 on firestorm 7 # Last modified Thu Nov 19 19:40:13 2020 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("%s\n", msg('mischief'))) 1603 sprintf(msg('mischief'), @opt['maintainer']) + "\n")
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'))

yatex.org