diff options
author | Joe Rayhawk <jrayhawk@fairlystable.org> | 2023-03-09 15:37:15 -0800 |
---|---|---|
committer | Joe Rayhawk <jrayhawk@fairlystable.org> | 2023-03-09 15:37:15 -0800 |
commit | 9d676f704498bd31a6a7691ea7ccebd588ea913d (patch) | |
tree | de8aae8a3297e864e3d9526a1e2879e565e79973 /pinyweb | |
parent | 40077107f4ec82f78d2f1456343f90339a10e73f (diff) | |
download | piny-code-9d676f704498bd31a6a7691ea7ccebd588ea913d.tar.gz piny-code-9d676f704498bd31a6a7691ea7ccebd588ea913d.zip |
newrepo: scalar()ize last of CGI parameters
Diffstat (limited to 'pinyweb')
-rwxr-xr-x | pinyweb/cgi-bin/auth/newrepo.cgi | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/pinyweb/cgi-bin/auth/newrepo.cgi b/pinyweb/cgi-bin/auth/newrepo.cgi index dfd9f02..0810fa7 100755 --- a/pinyweb/cgi-bin/auth/newrepo.cgi +++ b/pinyweb/cgi-bin/auth/newrepo.cgi @@ -16,7 +16,7 @@ print( "Content-type: text/plain\n\n"); open(STDERR, ">&STDOUT"); if( defined( $q->param('r') ) && defined( $q->param('d') ) ) { # repository, description - @cmd = ( '/usr/sbin/piny-suid', $ENV{'REMOTE_USER'}, 'newrepo', '--batch', '--enable-ikiwiki', $q->param('r') ); + @cmd = ( '/usr/sbin/piny-suid', $ENV{'REMOTE_USER'}, 'newrepo', '--batch', '--enable-ikiwiki', scalar( $q->param('r') ) ); if( defined( scalar( $q->param('i') ) ) && scalar( $q->param('i') ) eq "0" ) { push( @cmd, '--disable-ikiwiki' ); @@ -34,7 +34,7 @@ if( defined( $q->param('r') ) && defined( $q->param('d') ) ) { # repository, des # make things flushier select( (select(IN), $| = 1)[0] ); select( (select(OUT), $| = 1)[0] ); - print( IN $q->param('d') . "\n" ); + print( IN scalar( $q->param('d') ) . "\n" ); close( IN ); while( <OUT> ) { print; |