Browse Source

Fix serious bug where whole file would be wiped if nick field contained a
meta character.

Morten Brix Pedersen 24 years ago
parent
commit
9266900590
1 changed files with 1 additions and 1 deletions
  1. 1 1
      scripts/addalias/addalias.pl

+ 1 - 1
scripts/addalias/addalias.pl

@@ -478,7 +478,7 @@ sub updateinfo
     open(NEWFILE, ">$pisg_config") or die("Error updating configfile: $!");
     open(NEWFILE, ">$pisg_config") or die("Error updating configfile: $!");
     &lock_file(*NEWFILE);
     &lock_file(*NEWFILE);
     foreach $line (@lines) {
     foreach $line (@lines) {
-       if ($line =~ /^<user.*nick=\"$frm_nick\"/i) {
+       if ($line =~ /^<user.*nick=\"\Q$frm_nick\E\"/i) {
          print NEWFILE "$line_to_add\n"
          print NEWFILE "$line_to_add\n"
        } else {
        } else {
          print NEWFILE $line;
          print NEWFILE $line;