X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=C4%2FKoha.pm;h=26106cf4181a08982d11d6b675fd6edd53e5062d;hb=f9980f6b31c95b6240a9858bd9db63fa228278a0;hp=4f386e469d5cc7a6123ef742f1f360b54d97bb93;hpb=068e5be6395088793aeab66d67c36c2b9da2c5d9;p=koha_fer

diff --git a/C4/Koha.pm b/C4/Koha.pm
index 4f386e469d..26106cf418 100644
--- a/C4/Koha.pm
+++ b/C4/Koha.pm
@@ -674,6 +674,7 @@ sub getallthemes {
     opendir D, "$htdocs";
     my @dirlist = readdir D;
     foreach my $directory (@dirlist) {
+        next if $directory eq 'lib';
         -d "$htdocs/$directory/en" and push @themes, $directory;
     }
     return @themes;
@@ -1232,7 +1233,7 @@ sub GetNormalizedUPC {
 }
 
 # Normalizes and returns the first valid ISBN found in the record
-# ISBN13 are converted into ISBN10. This is required to get Amazon cover book.
+# ISBN13 are converted into ISBN10. This is required to get some book cover images.
 sub GetNormalizedISBN {
     my ($isbn,$record,$marcflavour) = @_;
     my @fields;