$spp = join('/',@spp);
$rcf="$spp$rc";
if (-x $rcf) { do $rcf; }
- $rcf="$ENV{'HOME'}/.sylpheed/$rc";
+ $rcf="$ENV{'HOME'}/.claws-mail/$rc";
if (-x $rcf) { do $rcf; }
}
@forens = ();
system(@vcmd);
}
if ($preview < 2) {
- @lprcmd = ($LPR,'-T','Sylpheed Mail',
+ @lprcmd = ($LPR,'-T','Claws Mail Mail',
($headerformat eq '')? '-l': '-p','-P',$printer,@forens, $tmpfn);
die "trying lpr: $! \n" unless (system(@lprcmd) != -1);
}