@@ -, +, @@ --- admin/preferences.pl | 1 - installer/featurereleasetool.pl | 3 --- .../intranet-tmpl/prog/en/includes/newsform.inc | 28 +++++++++++----------- 3 files changed, 14 insertions(+), 18 deletions(-) --- a/admin/preferences.pl +++ a/admin/preferences.pl @@ -33,7 +33,6 @@ use File::Spec; use IO::File; use YAML::Syck qw(); use List::MoreUtils qw(any); -use C4::Sysprefs; $YAML::Syck::ImplicitTyping = 1; $YAML::Syck::ImplicitUnicode = 1; our $lang; --- a/installer/featurereleasetool.pl +++ a/installer/featurereleasetool.pl @@ -99,10 +99,8 @@ my @logs = `cd $logdir && ls -t | grep "updatedatabase_2*"`; my $filename_suffix = $logs[0]; my $path = $logdir . '/' . $filename_suffix; -my $fh; my $file; my $count = 0; -my $version; $file = `cat $path`; $file = `echo "$file" | grep -Eo '?[0-9]+[.][0-9]+[.][0-9]+[.][0-9]+?'`; @@ -135,7 +133,6 @@ elsif ( $op && $op eq 'save' ) { #Submit changed systempreferences foreach my $param ( $query->param() ) { my ( $prefname ) = ( $param =~ /pref_(.*)/ ); next if ( !defined( $prefname ) ); - my $wholevalue = join( ',', $query->param($param) ); my ($name, $value) = split(/,/,$wholevalue); C4::Context->set_preference( $name, $value ); --- a/koha-tmpl/intranet-tmpl/prog/en/includes/newsform.inc +++ a/koha-tmpl/intranet-tmpl/prog/en/includes/newsform.inc @@ -8,32 +8,32 @@ -
+
OPAC and Koha news
  1. @@ -54,12 +54,12 @@
  2. -
    [% INCLUDE 'date-format.inc' %]
    +
    [% INCLUDE 'date-format.inc' %]
  3. -
    [% INCLUDE 'date-format.inc' %]
    +
    [% INCLUDE 'date-format.inc' %]
  4. --