[open-ils-commits] r8897 - trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher

svn at svn.open-ils.org svn at svn.open-ils.org
Fri Mar 7 11:59:56 EST 2008


Author: miker
Date: 2008-03-07 11:27:16 -0500 (Fri, 07 Mar 2008)
New Revision: 8897

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm
Log:
thinkos

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm	2008-03-07 15:48:31 UTC (rev 8896)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm	2008-03-07 16:27:16 UTC (rev 8897)
@@ -2426,9 +2426,9 @@
 	my $param_pref_lang = $args{preferred_language}; $param_perf_lang =~ s/\$//go; $param_perf_lang = '$$'.$param_perf_lang.'$$';
 	my $param_pref_lang_multiplier = $args{preferred_language_weight}; $param_perf_lang_multiplier ||= 'NULL';
 	my $param_sort = $args{'sort'}; $param_sort =~ s/\$//go; $param_sort = '$$'.$param_sort.'$$';
-	my $param_sort_desc = (defined($args{sort_dir}) && $args{sort_dir} =~ /^d/io ? "'t'" : "'f'");
-	my $metarecord = ($self->api_name =~ /metabib/o) ? "'t'" : "'f'");
-	my $staff = ($self->api_name =~ /staff/o) ? "'t'" : "'f'");
+	my $param_sort_desc = defined($args{sort_dir}) && $args{sort_dir} =~ /^d/io ? "'t'" : "'f'";
+	my $metarecord = $self->api_name =~ /metabib/o) ? "'t'" : "'f'";
+	my $staff = $self->api_name =~ /staff/o) ? "'t'" : "'f'";
     my $param_rel_limit = $args{core_limit}; $param_rel_limit ||= 'NULL';
     my $param_chk_limit = $args{check_limit}; $param_chk_limit ||= 'NULL';
     my $param_skip_chk = $args{skip_check}; $param_skip_chk ||= 'NULL';



More information about the open-ils-commits mailing list