# Display all the CUPS drivers
printf "<tr> <td valign=top><input type=radio name=mode value=1 %s> %s</td>\n",
$_[1]->{'mode'} == 1 ? 'checked' : '', $text{'cups_driver'};
-print "<td><select name=ppd size=10>\n";
local (@ppds, $d, $f, $ppd, %cache, $outofdate, @files, %donefile);
-open(FIND, "find '$config{'model_path'}' -type f -print |");
+open(FIND, "find -L ".quotemeta($config{'model_path'})." -type f -print |");
while(<FIND>) {
chop;
/([^\/]+)$/;
&write_file("$module_config_directory/ppd-cache", \%cache);
}
local %done;
+print "<td><select name=ppd size=10>\n";
foreach $f (sort { $cache{$a} cmp $cache{$b} } keys %cache) {
if ($cache{$f} && $cache{$f} ne "duplicate" &&
!$done{$cache{$f}}++) {