Attachment 25908 Details for Bug 7180 – Bug 7180: fetch_sort_dropbox.pl is not in use anymore

[patch] Bug 7180: fetch_sort_dropbox.pl is not in use anymore

Bug-7180-fetchsortdropboxpl-is-not-in-use-anymore.patch (text/plain), 3.56 KB, created by Jonathan Druart on 2014-03-06 16:20:14 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Jonathan Druart

Created: 2014-03-06 16:20:14 UTC

Size: 3.56 KB

patch

obsolete

>From c4f1a23ebaba5c0dac46fc9ef86a106e44cb29b9 Mon Sep 17 00:00:00 2001
>From: Jonathan Druart <jonathan.druart@biblibre.com>
>Date: Thu, 6 Mar 2014 17:19:20 +0100
>Subject: [PATCH] Bug 7180: fetch_sort_dropbox.pl is not in use anymore
>
>Test plan:
>  git grep fetch_sort_dropbox
>should return no result.
>---
> acqui/fetch_sort_dropbox.pl |  107 -------------------------------------------
> 1 file changed, 107 deletions(-)
> delete mode 100755 acqui/fetch_sort_dropbox.pl
>
>diff --git a/acqui/fetch_sort_dropbox.pl b/acqui/fetch_sort_dropbox.pl
>deleted file mode 100755
>index ce47fb7..0000000
>--- a/acqui/fetch_sort_dropbox.pl
>+++ /dev/null
>@@ -1,107 +0,0 @@
>-#!/usr/bin/perl
>-
>-# Copyright 2008-2009 BibLibre SARL
>-#
>-# This file is part of Koha.
>-#
>-# Koha is free software; you can redistribute it and/or modify it under the
>-# terms of the GNU General Public License as published by the Free Software
>-# Foundation; either version 2 of the License, or (at your option) any later
>-# version.
>-#
>-# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
>-# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
>-# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
>-#
>-# You should have received a copy of the GNU General Public License along
>-# with Koha; if not, write to the Free Software Foundation, Inc.,
>-# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
>-
>-use strict;
>-use warnings;
>-use CGI;
>-use C4::Context;
>-use C4::Output;
>-use C4::Auth;
>-use C4::Budgets;
>-
>-=head1 NAME
>-
>-fetch_sort_dropbox.pl
>-
>-=head1 DESCRIPTION
>-
>- This script fetches sort values for a given budget id. Currently it is used to dynamically fill
>- 'Statistic 1' and 'Statistic 2' comboboxes in neworderempty page. Values retrieved depend on
>- categories of authorized values defined in funds configuration.
>-
>-=head1 CGI PARAMETERS
>-
>-=over 4
>-
>-=item budget_id
>-
>-Budget identifier
>-
>-=item sort
>-
>-Sort number. 1 or 2 for the moment.
>-
>-=back
>-
>-=cut
>-
>-my $input = new CGI;
>-
>-my $budget_id = $input->param('budget_id');
>-my $sort_nb   = $input->param('sort');
>-die "sort parameter can only be 1 or 2" unless ($sort_nb == 1 || $sort_nb == 2);
>-
>-my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
>-    {   template_name   => "acqui/ajax.tmpl",
>-        query           => $input,
>-        type            => "intranet",
>-        authnotrequired => 0,
>-        flagsrequired => {acquisition => 'order_manage'},
>-        debug => 0,
>-    }
>-);
>-
>-my $ret_html;
>-my $name = 'sort'.$sort_nb;
>-my $authcat_field = 'sort'.$sort_nb.'_authcat';
>-
>-my $budget = GetBudget($budget_id);
>-
>-if ( $budget && $budget->{$authcat_field} ) {
>-    # with custom  Asort* planning values
>-    my $dropbox_values = GetAuthvalueDropbox( $budget->{$authcat_field}, '' );
>-
>-    my @authorised_values;
>-    my %authorised_lib;
>-    my $default_value;
>-
>-    foreach ( @$dropbox_values) {
>-        push @authorised_values, $_->{value};
>-        $authorised_lib{$_->{value}} = $_->{label};
>-        $default_value = $_->{value} if $_->{'default'};
>-    }
>-
>-    $ret_html = CGI::scrolling_list(
>-        -values   => \@authorised_values,
>-        -labels   => \%authorised_lib,
>-        -default  => $default_value,
>-        -override => 1,
>-        -size     => 1,
>-        -multiple => 0,
>-        -name     => $name,
>-        -id       => $name,
>-    );
>-
>-} else {
>-    # free input
>-    $ret_html = '<input type="text" size="20" name="'.$name.'" id="'.$name.'" />';
>-}
>-
>-$template->param( 'return' => $ret_html );
>-output_html_with_http_headers $input, $cookie, $template->output;
>-- 
>1.7.10.4

Actions: View | Diff | Splinter Review

Attachments on bug 7180: 6234 | 13019 | 15023 | 15048 | 15617 | 15677 | 15934 | 15935 | 16014 | 16505 | 16511 | 16544 | 16566 | 16613 | 19066 | 19067 | 19068 | 19316 | 19587 | 19588 | 19589 | 19590 | 19641 | 19645 | 20900 | 20901 | 20902 | 20903 | 20904 | 20926 | 20933 | 20934 | 20935 | 20978 | 20979 | 21004 | 21014 | 21017 | 21117 | 21462 | 21463 | 21464 | 21465 | 21466 | 21467 | 21468 | 21469 | 21470 | 21471 | 21472 | 21473 | 21474 | 21514 | 22546 | 22547 | 22548 | 22549 | 22550 | 22551 | 22552 | 22553 | 22554 | 22555 | 22556 | 22557 | 22558 | 22559 | 24052 | 24053 | 24054 | 24055 | 24056 | 24057 | 24058 | 24059 | 24060 | 24061 | 24062 | 24063 | 24064 | 24065 | 24636 | 24637 | 24638 | 24639 | 24640 | 24641 | 24642 | 24643 | 24644 | 24645 | 24646 | 24647 | 24648 | 24649 | 24708 | 24709 | 24710 | 24711 | 24712 | 24713 | 24714 | 24715 | 24716 | 24717 | 24718 | 24719 | 24720 | 24721 | 25908 | 26950 | 26951 | 26952 | 26953 | 26954 | 26955 | 26956 | 26957 | 26958 | 26959 | 26960 | 26961 | 26962 | 26963 | 26964 | 27128 | 27131 | 27136 | 27160 | 27325 | 27408 | 27409 | 27410 | 27411 | 27412 | 27413 | 27414 | 27415 | 27416 | 27417 | 27418 | 27419 | 27420 | 27421 | 27422 | 27423 | 27424 | 27451 | 27520 | 27561 | 27562 | 27563 | 27564 | 27565 | 27566 | 27567 | 27568 | 27569 | 27570 | 27571 | 27572 | 27573 | 27574 | 27575 | 27576 | 27577 | 27578 | 27829 | 27830 | 27831 | 27832 | 27833 | 27834 | 27835 | 27836 | 27837 | 27838 | 27839 | 27840 | 27841 | 27842 | 27843 | 27844 | 27845 | 27846 | 27847 | 27848 | 27849 | 27850 | 27851 | 27852 | 27853 | 27854 | 27855 | 27856 | 27857 | 27858 | 27859 | 27860 | 27861 | 27862 | 27863 | 27864 | 27865 | 27866