diff options
Diffstat (limited to 'win32/config_sh.PL')
| -rw-r--r-- | win32/config_sh.PL | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/win32/config_sh.PL b/win32/config_sh.PL index 020485d66a..0769ef3112 100644 --- a/win32/config_sh.PL +++ b/win32/config_sh.PL @@ -10,6 +10,10 @@ if ($] =~ /\.(\d\d\d)?(\d\d)?$/) { # should always be true $opt{SUBVERSION} = $2 || '00'; } +$opt{'cf_by'} = $ENV{USERNAME} unless $opt{'cf_by'}; +$opt{'cf_email'} = $opt{'cf_by'} . '@' . (gethostbyname('localhost'))[0] + unless $opt{'cf_email'}; + while (<>) { s/~([\w_]+)~/$opt{$1}/g; |