3 # Add or change a MIME type
5 require './apache-lib.pl';
7 $access{'global'}==1 || &error($text{'mime_ecannot'});
9 &error_setup($text{'mime_err'});
10 if ($in{'type'} !~ /^(\S+)\/(\S+)$/) {
11 &error(&text('mime_etype', $in{'type'}));
14 &lock_file($in{'file'});
15 open(MIME, $in{'file'});
18 $line = "$in{'type'} ".join(" ", split(/\s+/, $in{'exts'}))."\n";
20 $mime[$in{'line'}] = $line;
25 &open_tempfile(MIME, "> $in{'file'}");
26 &print_tempfile(MIME, @mime);
27 &close_tempfile(MIME);
28 &unlock_file($in{'file'});
29 &webmin_log("mime", $in{'line'} ? 'modify' : 'create', $in{'type'}, \%in);
30 &redirect("edit_global.cgi?type=6");