[Koha-cvs] koha readingrec.pl [dev_week]

[Kyle Hall]

CVSROOT:	/sources/koha
Module name:	koha
Branch:		dev_week
Changes by:	Kyle Hall <kylemhall>	08/03/14 14:38:52

Modified files:
	.              : readingrec.pl 

Log message:
	Bugfix: Forgot to add + 1 to the substring length to removing the space trailing the stopword.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/readingrec.pl?cvsroot=koha&only_with_tag=dev_week&r1=1.12.2.5.2.4&r2=1.12.2.5.2.5

Patches:
Index: readingrec.pl
===================================================================
RCS file: /sources/koha/koha/Attic/readingrec.pl,v
retrieving revision 1.12.2.5.2.4
retrieving revision 1.12.2.5.2.5
diff -u -b -r1.12.2.5.2.4 -r1.12.2.5.2.5
--- readingrec.pl	14 Mar 2008 13:42:13 -0000	1.12.2.5.2.4
+++ readingrec.pl	14 Mar 2008 14:38:52 -0000	1.12.2.5.2.5
@@ -93,7 +93,7 @@
 		my ( $key, $value );
 		while ( ( $key, $value ) = each( %$stopwords ) ) {
 			if ( $line{titlesort} =~ m/^$key / ) { ## space after $key make sure its not the beginning of a different word
-				$line{titlesort} = substr( $line{titlesort}, length( $key ) );
+				$line{titlesort} = substr( $line{titlesort}, length( $key ) + 1 );
 			}
 		}
 	}