diff options
| author | ivan <ivan> | 2008-04-11 09:20:50 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2008-04-11 09:20:50 +0000 |
| commit | b60afb3800213aa1c6a4aed9d4bb995c628c6011 (patch) | |
| tree | 893e18611f11d709ee675e50a86caa63aa1ee5e1 /httemplate/misc/cdr-import.html | |
| parent | 542e551fdbb3ca9a402021390bcefd17104612db (diff) | |
taqua cdrs!
Diffstat (limited to 'httemplate/misc/cdr-import.html')
| -rw-r--r-- | httemplate/misc/cdr-import.html | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/httemplate/misc/cdr-import.html b/httemplate/misc/cdr-import.html index a71b25b67..b46607869 100644 --- a/httemplate/misc/cdr-import.html +++ b/httemplate/misc/cdr-import.html @@ -3,8 +3,8 @@ Import a CSV file containing Call Detail Records (CDRs).<BR><BR> CDR Format: <SELECT NAME="format"> -% foreach $format ( keys %formats ) { - <OPTION VALUE="<% $format %>"><% $format{$format} %></OPTION> +% foreach my $format ( keys %formats ) { + <OPTION VALUE="<% $format %>"><% $formats{$format} %></OPTION> % } </SELECT> <BR><BR> @@ -21,6 +21,6 @@ Filename: <INPUT TYPE="file" NAME="csvfile"><BR><BR> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('Import'); -tie my %formats, FS::cdr->import_formats; +tie my %formats, 'Tie::IxHash', FS::cdr->import_formats; </%init> |