[Koha-cvs] koha admin/systempreferences.pl tools/koha-news.pl [rel_3_0]

[Bruno Toumi]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         rel_3_0
Changes by:     Bruno Toumi <btoumi>    06/08/29 16:11:36

Modified files:
        admin          : systempreferences.pl 
        tools          : koha-news.pl 

Log message:
        bug fix : modify function name 

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/admin/systempreferences.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.34&r2=1.34.2.1
http://cvs.savannah.gnu.org/viewcvs/koha/tools/koha-news.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.1&r2=1.1.2.1

Patches:
Index: admin/systempreferences.pl
===================================================================
RCS file: /sources/koha/koha/admin/systempreferences.pl,v
retrieving revision 1.34
retrieving revision 1.34.2.1
diff -u -b -r1.34 -r1.34.2.1
--- admin/systempreferences.pl  7 Jun 2006 02:05:06 -0000       1.34
+++ admin/systempreferences.pl  29 Aug 2006 16:11:35 -0000      1.34.2.1
@@ -305,7 +305,7 @@
                    $currently_selected_languages->{$language}=1;
                    $counter++;
                }
-               foreach my $language (getalllanguages()) {
+               foreach my $language (GetLanguages()) {
                        next if $language eq 'images';
                        my $selected='0';
                        next if $currently_selected_languages->{$language};

Index: tools/koha-news.pl
===================================================================
RCS file: /sources/koha/koha/tools/koha-news.pl,v
retrieving revision 1.1
retrieving revision 1.1.2.1
diff -u -b -r1.1 -r1.1.2.1
--- tools/koha-news.pl  3 Mar 2006 16:35:21 -0000       1.1
+++ tools/koha-news.pl  29 Aug 2006 16:11:35 -0000      1.1.2.1
@@ -52,7 +52,7 @@
 # get lang list
 my @lang_list;
 
-foreach my $language (getalllanguages()) {
+foreach my $language (GetLanguages()) {
        push @lang_list, { language => $language,
                                                selected => 
($new_detail->{lang} eq $language?1:0),
                                        };