diff options
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; |