diff options
| author | ivan <ivan> | 2004-10-12 06:08:03 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2004-10-12 06:08:03 +0000 |
| commit | 6083603212ea08b80c0f48ad61f4421aae85c31d (patch) | |
| tree | 4f382f63283d2abab6b8fb20503aa32a99ae2310 /httemplate/search/sqlradius.cgi | |
| parent | 93e53eec9c0385c707760987cc2c6ab179a4ea63 (diff) | |
more info in error message for unknown export type, fix test for sqlradius_withdomain export, woo!
Diffstat (limited to 'httemplate/search/sqlradius.cgi')
| -rw-r--r-- | httemplate/search/sqlradius.cgi | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/httemplate/search/sqlradius.cgi b/httemplate/search/sqlradius.cgi index 5fd32f4..b506ba1 100644 --- a/httemplate/search/sqlradius.cgi +++ b/httemplate/search/sqlradius.cgi @@ -64,7 +64,7 @@ $svc_acct = $user2svc_acct{$user}; } else { my %search = (); - if ( $part_export->exporrtype eq 'sqlradius_withdomain' ) { + if ( $part_export->exporttype eq 'sqlradius_withdomain' ) { my $domain; if ( $user =~ /^([^@]+)\@([^@]+)$/ ) { $search{'username'} = $1; @@ -82,7 +82,8 @@ } elsif ( $part_export->exporttype eq 'sqlradius' ) { $search{'username'} = $user; } else { - die "guru meditation #420"; + die 'unknown export type '. $part_export->exporttype. + " for $part_export\n"; } if ( keys %search ) { my @svc_acct = |