Attachment #100017 for bug #23355

View | Details | Raw Unified | Return to bug 23355
Collapse All | Expand All





# 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 3 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, see <http://www.gnu.org/licenses>.
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.

use Modern::Perl;






# 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 3 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, see <http://www.gnu.org/licenses>.
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.

use Modern::Perl;





#!/usr/bin/perl

# Copyright 2020 PTFS-Europe Ltd
#
# 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 3 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.
#
# 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, see <http://www.gnu.org/licenses>.

use Modern::Perl;
use CGI;
- 

Return to bug 23355

Lines 2-19 package Koha::Cash::Register::Action; Link Here

(-)a/Koha/Cash/Register/Action.pm (-10 / +10 lines)
2		2
3	# This file is part of Koha.	3	# This file is part of Koha.
4	#	4	#
5	# Koha is free software; you can redistribute it and/or modify it under the	5	# Koha is free software; you can redistribute it and/or modify it
6	# terms of the GNU General Public License as published by the Free Software	6	# under the terms of the GNU General Public License as published by
7	# Foundation; either version 3 of the License, or (at your option) any later	7	# the Free Software Foundation; either version 3 of the License, or
8	# version.	8	# (at your option) any later version.
9	#	9	#
10	# Koha is distributed in the hope that it will be useful, but WITHOUT ANY	10	# Koha is distributed in the hope that it will be useful, but
11	# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR	11	# WITHOUT ANY WARRANTY; without even the implied warranty of
12	# A PARTICULAR PURPOSE. See the GNU General Public License for more details.	12	# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
		13	# GNU General Public License for more details.
13	#	14	#
14	# You should have received a copy of the GNU General Public License along	15	# You should have received a copy of the GNU General Public License
15	# with Koha; if not, write to the Free Software Foundation, Inc.,	16	# along with Koha; if not, see <http://www.gnu.org/licenses>.
16	# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
17		17
18	use Modern::Perl;	18	use Modern::Perl;
19		19

Lines 2-19 package Koha::Cash::Register::Actions; Link Here

(-)a/Koha/Cash/Register/Actions.pm (-10 / +10 lines)
2		2
3	# This file is part of Koha.	3	# This file is part of Koha.
4	#	4	#
5	# Koha is free software; you can redistribute it and/or modify it under the	5	# Koha is free software; you can redistribute it and/or modify it
6	# terms of the GNU General Public License as published by the Free Software	6	# under the terms of the GNU General Public License as published by
7	# Foundation; either version 3 of the License, or (at your option) any later	7	# the Free Software Foundation; either version 3 of the License, or
8	# version.	8	# (at your option) any later version.
9	#	9	#
10	# Koha is distributed in the hope that it will be useful, but WITHOUT ANY	10	# Koha is distributed in the hope that it will be useful, but
11	# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR	11	# WITHOUT ANY WARRANTY; without even the implied warranty of
12	# A PARTICULAR PURPOSE. See the GNU General Public License for more details.	12	# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
		13	# GNU General Public License for more details.
13	#	14	#
14	# You should have received a copy of the GNU General Public License along	15	# You should have received a copy of the GNU General Public License
15	# with Koha; if not, write to the Free Software Foundation, Inc.,	16	# along with Koha; if not, see <http://www.gnu.org/licenses>.
16	# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
17		17
18	use Modern::Perl;	18	use Modern::Perl;
19		19

Lines 1-22 Link Here

(-)a/pos/register.pl (-14 / +12 lines)
1	#!/usr/bin/perl	1	#!/usr/bin/perl
2	#	2
3	# c 2020 PTFS-Europe Ltd	3	# Copyright 2020 PTFS-Europe Ltd
4	#	4	#
5	# This file is part of Koha.	5	# This file is part of Koha.
6	#	6	#
7	# Koha is free software; you can redistribute it and/or modify it under the	7	# Koha is free software; you can redistribute it and/or modify it
8	# terms of the GNU General Public License as published by the Free Software	8	# under the terms of the GNU General Public License as published by
9	# Foundation; either version 2 of the License, or (at your option) any later	9	# the Free Software Foundation; either version 3 of the License, or
10	# version.	10	# (at your option) any later version.
11	#
12	# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
13	# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
14	# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
15	#	11	#
16	# You should have received a copy of the GNU General Public License along with	12	# Koha is distributed in the hope that it will be useful, but
17	# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,	13	# WITHOUT ANY WARRANTY; without even the implied warranty of
18	# Suite 330, Boston, MA 02111-1307 USA	14	# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
		15	# GNU General Public License for more details.
19	#	16	#
		17	# You should have received a copy of the GNU General Public License
		18	# along with Koha; if not, see <http://www.gnu.org/licenses>.
20		19
21	use Modern::Perl;	20	use Modern::Perl;
22	use CGI;	21	use CGI;
23	-