[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 );
                        }
                }
        }