[interchange] * Add "default" option on CGI tag. Negligible impact on performance, as
Mike Heins <[email protected]> Thu, 07 Jul 2016 02:00:13 +0000
| Newsgroups | gmane.comp.web.interchange.cvs |
|---|---|
| Message-ID | <[email protected]> |
commit 12d531675b82a0654117f362d4939c697e66906d Author: Mike Heins <[email protected]> Date: Wed Jul 6 21:56:48 2016 -0400 * Add "default" option on CGI tag. Negligible impact on performance, as branch only followed on blank/zero value. * Close Issue #94 on Github. code/SystemTag/cgi.coretag | 4 ++++ 1 files changed, 4 insertions(+), 0 deletions(-) --- diff --git a/code/SystemTag/cgi.coretag b/code/SystemTag/cgi.coretag index 39b146a..e35a90b 100644 --- a/code/SystemTag/cgi.coretag +++ b/code/SystemTag/cgi.coretag @@ -24,6 +24,10 @@ sub { $value =~ s~<([A-Za-z]*[^>]*\s+[Mm][Vv]\s*=\s*)~<$1~g; $value =~ s/\[/[/g; } + elsif(defined $opt->{default}) { + $value = $opt->{default}; + } + if($opt->{filter}) { $value = filter_value($opt->{filter}, $value, $var); $CGI::values{$var} = $value unless $opt->{keep};