Some people don't have 20/20 vision, so elide 'I' and '1' from the
characters in the confirmation image. en/gifs/1.pnm and en/gifs/I.pnm will be safe to remove 45 minutes after the next web build and not before, so I'll do that tomorrow. PR: www/69676
This commit is contained in:
parent
310f3da377
commit
798c983fea
Notes:
svn2git
2020-12-08 03:00:23 +00:00
svn path=/www/; revision=21711
3 changed files with 11 additions and 11 deletions
|
@ -1,6 +1,6 @@
|
|||
#!/usr/bin/perl -T
|
||||
#
|
||||
# $FreeBSD: www/en/cgi/sendpr-code.cgi,v 1.1 2003/12/14 17:28:13 ceri Exp $
|
||||
# $FreeBSD: www/en/cgi/sendpr-code.cgi,v 1.2 2004/01/03 21:24:51 ceri Exp $
|
||||
#
|
||||
# Copyright (c) 2003 Eric Anderson
|
||||
|
||||
|
@ -15,9 +15,9 @@ my($fd, $db_obj, %db_hash, $currenttime, $randomcode, $pngbindata, $randompick,
|
|||
my($expiretime, $pnmcat, $pnmtopng, $pnmdatadir, $dbpath);
|
||||
|
||||
############################################
|
||||
# generate 8 charactor code from A-Z0-9 (no o,O,0)
|
||||
my @availchars = qw(A B C D E F G H I J K L M N P Q R S T U V W X Y Z
|
||||
1 2 3 4 5 6 7 8 9);
|
||||
# generate 8 character code from A-Z0-9 (no I,O,0,1 for clarity)
|
||||
my @availchars = qw(A B C D E F G H J K L M N P Q R S T U V W X Y Z
|
||||
2 3 4 5 6 7 8 9);
|
||||
|
||||
$pnmcat = "/usr/local/bin/pnmcat";
|
||||
$pnmtopng = "/usr/local/bin/pnmtopng";
|
||||
|
|
|
@ -1,6 +1,6 @@
|
|||
#!/usr/bin/perl -T
|
||||
#
|
||||
# $FreeBSD: www/en/cgi/sendpr-code.cgi,v 1.1 2003/12/14 17:28:13 ceri Exp $
|
||||
# $FreeBSD: www/en/cgi/sendpr-code.cgi,v 1.2 2004/01/03 21:24:51 ceri Exp $
|
||||
#
|
||||
# Copyright (c) 2003 Eric Anderson
|
||||
|
||||
|
@ -15,9 +15,9 @@ my($fd, $db_obj, %db_hash, $currenttime, $randomcode, $pngbindata, $randompick,
|
|||
my($expiretime, $pnmcat, $pnmtopng, $pnmdatadir, $dbpath);
|
||||
|
||||
############################################
|
||||
# generate 8 charactor code from A-Z0-9 (no o,O,0)
|
||||
my @availchars = qw(A B C D E F G H I J K L M N P Q R S T U V W X Y Z
|
||||
1 2 3 4 5 6 7 8 9);
|
||||
# generate 8 character code from A-Z0-9 (no I,O,0,1 for clarity)
|
||||
my @availchars = qw(A B C D E F G H J K L M N P Q R S T U V W X Y Z
|
||||
2 3 4 5 6 7 8 9);
|
||||
|
||||
$pnmcat = "/usr/local/bin/pnmcat";
|
||||
$pnmtopng = "/usr/local/bin/pnmtopng";
|
||||
|
|
|
@ -1,6 +1,6 @@
|
|||
#!/bin/sh
|
||||
#
|
||||
# $FreeBSD$
|
||||
# $FreeBSD: www/tools/buildpnms.sh,v 1.1 2003/12/14 17:28:12 ceri Exp $
|
||||
#
|
||||
# Shell script to generate the .pnm files required for the send-pr
|
||||
# mechanism. This is not used by the build process, as it requires
|
||||
|
@ -11,8 +11,8 @@ GOZER=/usr/X11R6/bin/gozer
|
|||
PNGTOPNM=/usr/local/bin/pngtopnm
|
||||
VERBOSE=/usr/bin/false
|
||||
|
||||
# Generate 8 character code from A-Z0-9 (no o,O,0)
|
||||
availchars="A B C D E F G H I J K L M N P Q R S T U V W X Y Z 1 2 3 4 5 6 7 8 9"
|
||||
# Generate 8 character code from A-Z0-9 (no I,O,0,1 for clarity)
|
||||
availchars="A B C D E F G H J K L M N P Q R S T U V W X Y Z 2 3 4 5 6 7 8 9"
|
||||
|
||||
for char in ${availchars}
|
||||
do
|
||||
|
|
Loading…
Reference in a new issue