Diff for /loncom/lond between versions 1.512 and 1.513

version 1.512, 2014/11/24 02:36:16 version 1.513, 2015/01/03 02:34:36
Line 2808  sub newput_user_profile_entry { Line 2808  sub newput_user_profile_entry {
     foreach my $pair (@pairs) {      foreach my $pair (@pairs) {
  my ($key,$value)=split(/=/,$pair);   my ($key,$value)=split(/=/,$pair);
  if (exists($hashref->{$key})) {   if (exists($hashref->{$key})) {
     &Failure($client, "key_exists: ".$key."\n",$userinput);              if (!&untie_user_hash($hashref)) {
     return 1;                  &logthis("error: ".($!+0)." untie (GDBM) failed ".
                            "while attempting newput - early out as key exists");
               }
               &Failure($client, "key_exists: ".$key."\n",$userinput);
               return 1;
  }   }
     }      }
   

Removed from v.1.512  
changed lines
  Added in v.1.513


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>