Bug 6939 DefaultClassificationSource should be default in 942
authorColin Campbell <colin.campbell@ptfs-europe.com>
Mon, 18 Jun 2012 10:23:42 +0000 (11:23 +0100)
committerPaul Poulain <paul.poulain@biblibre.com>
Thu, 28 Jun 2012 07:29:14 +0000 (09:29 +0200)
A logic bug in the original code adding DefaultClassificationSource
caused the default not to be used (the last used value was used instead)
The bug was fixed in additem by bug 2398 but addbiblio's use
of the code was not fixed.

Signed-off-by: Nicole C. Engard <nengard@bywatersolutions.com>
Signed-off-by: Paul Poulain <paul.poulain@biblibre.com>
cataloguing/addbiblio.pl

index 643fc53..3db1a65 100755 (executable)
@@ -215,10 +215,8 @@ sub build_authorized_values_list {
                         ($class_source eq $default_source);
             push @authorised_values, $class_source;
             $authorised_lib{$class_source} = $class_sources->{$class_source}->{'description'};
-            $value = $class_source unless ($value);
-            $value = $default_source unless ($value);
         }
-        #---- "true" authorised value
+        $value = $default_source unless $value;
     }
     else {
         $authorised_values_sth->execute(