[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/C4 Koha.pm Search.pm
From: |
paul poulain |
Subject: |
[Koha-cvs] koha/C4 Koha.pm Search.pm |
Date: |
Tue, 26 Jun 2007 09:20:22 +0000 |
CVSROOT: /sources/koha
Module name: koha
Changes by: paul poulain <tipaul> 07/06/26 09:20:22
Modified files:
C4 : Koha.pm Search.pm
Log message:
why was title ordering on 1=36 ? in ccl.properties, it s 1=4. (1=36
being for title-cover)
thus, the title sorting was not working. This commit fixes the problem.
LIBLIME : verify I am right in the analysis and in the fix, it is a
part mostly written by joshua
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Koha.pm?cvsroot=koha&r1=1.54&r2=1.55
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Search.pm?cvsroot=koha&r1=1.147&r2=1.148
Patches:
Index: Koha.pm
===================================================================
RCS file: /sources/koha/koha/C4/Koha.pm,v
retrieving revision 1.54
retrieving revision 1.55
diff -u -b -r1.54 -r1.55
--- Koha.pm 25 Jun 2007 15:05:18 -0000 1.54
+++ Koha.pm 26 Jun 2007 09:20:21 -0000 1.55
@@ -17,7 +17,7 @@
# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
# Suite 330, Boston, MA 02111-1307 USA
-# $Id: Koha.pm,v 1.54 2007/06/25 15:05:18 tipaul Exp $
+# $Id: Koha.pm,v 1.55 2007/06/26 09:20:21 tipaul Exp $
use strict;
require Exporter;
@@ -25,7 +25,7 @@
use C4::Output;
use vars qw($VERSION @ISA @EXPORT);
-$VERSION = do { my @v = '$Revision: 1.54 $' =~ /\d+/g; shift(@v) . "." . join(
"_", map { sprintf "%03d", $_ } @v ); };
+$VERSION = do { my @v = '$Revision: 1.55 $' =~ /\d+/g; shift(@v) . "." . join(
"_", map { sprintf "%03d", $_ } @v ); };
=head1 NAME
@@ -791,8 +791,8 @@
value => "1=32 <i",
label => " Acquisition Date: Oldest to Newest"
},
- { value => "1=36 <i", label => "Title (A-Z)" },
- { value => "1=36 >i", label => "Title (Z-A)" },
+ { value => "1=4 <i", label => "Title (A-Z)" },
+ { value => "1=4 >i", label => "Title (Z-A)" },
];
for my $hash (@$sort_by_loop) {
Index: Search.pm
===================================================================
RCS file: /sources/koha/koha/C4/Search.pm,v
retrieving revision 1.147
retrieving revision 1.148
diff -u -b -r1.147 -r1.148
--- Search.pm 15 Jun 2007 16:32:44 -0000 1.147
+++ Search.pm 26 Jun 2007 09:20:22 -0000 1.148
@@ -25,7 +25,7 @@
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
# set the version for version checking
-$VERSION = do { my @v = '$Revision: 1.147 $' =~ /\d+/g;
+$VERSION = do { my @v = '$Revision: 1.148 $' =~ /\d+/g;
shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v );
};
@@ -238,7 +238,7 @@
$expanded_facet, $branches, $query_type,
$scan
) = @_;
-
+ warn "Query : $koha_query";
my @servers = @$servers_ref;
my @sort_by = @$sort_by_ref;
@@ -1427,7 +1427,7 @@
#
# ORDER BY title
#
- } elsif ($ordering =~ /1=36/) {
+ } elsif ($ordering =~ /1=4/) {
# the title is in the biblionumbers string, so we just need to build a
hash, sort it and return
my %result;
foreach (split /;/,$biblionumbers) {
@@ -1441,7 +1441,7 @@
# sort the hash and return the same structure as GetRecords (Zebra
querying)
my $result_hash;
my $numbers=0;
- if ($ordering eq '1=36 <i') { # sort by title desc
+ if ($ordering eq '1=4 <i') { # sort by title desc
foreach my $key (sort (keys %result)) {
$result_hash->{'RECORDS'}[$numbers++] = $result{$key};
}
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha/C4 Koha.pm Search.pm,
paul poulain <=