[popfile-commit] engine/Classifier Bayes.pm,1.145,1.146 WordMangle.pm,1.22,1.23

[<jgr...@us...>]

Update of /cvsroot/popfile/engine/Classifier
In directory sc8-pr-cvs1:/tmp/cvs-serv27372a/Classifier

Modified Files:
	Bayes.pm WordMangle.pm 
Log Message:
Fix inconsistent language referring to stop_word vs stopword

Index: Bayes.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Classifier/Bayes.pm,v
retrieving revision 1.145
retrieving revision 1.146
diff -C2 -d -r1.145 -r1.146
*** Bayes.pm	20 May 2003 20:15:02 -0000	1.145
--- Bayes.pm	20 May 2003 20:20:32 -0000	1.146
***************
*** 1610,1614 ****
  # ---------------------------------------------------------------------------------------------
  #
! # get_stop_word_list
  #
  # Gets the complete list of stop words
--- 1610,1614 ----
  # ---------------------------------------------------------------------------------------------
  #
! # get_stopword_list
  #
  # Gets the complete list of stop words
***************
*** 1616,1620 ****
  # ---------------------------------------------------------------------------------------------
  
! sub get_stop_word_list
  {
      my ( $self ) = @_;
--- 1616,1620 ----
  # ---------------------------------------------------------------------------------------------
  
! sub get_stopword_list
  {
      my ( $self ) = @_;

Index: WordMangle.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Classifier/WordMangle.pm,v
retrieving revision 1.22
retrieving revision 1.23
diff -C2 -d -r1.22 -r1.23
*** WordMangle.pm	7 Apr 2003 17:55:48 -0000	1.22
--- WordMangle.pm	20 May 2003 20:20:33 -0000	1.23
***************
*** 28,32 ****
      bless $self, $type;
  
!     $self->load_stop_words();
  
      return $self;
--- 28,32 ----
      bless $self, $type;
  
!     $self->load_stopwords();
  
      return $self;
***************
*** 35,42 ****
  # ---------------------------------------------------------------------------------------------
  #
! # load_stop_words, save_stop_words - load and save the stop word list in the stopwords file
  #
  # ---------------------------------------------------------------------------------------------
! sub load_stop_words
  {
      my ($self) = @_;
--- 35,42 ----
  # ---------------------------------------------------------------------------------------------
  #
! # load_stopwords, save_stopwords - load and save the stop word list in the stopwords file
  #
  # ---------------------------------------------------------------------------------------------
! sub load_stopwords
  {
      my ($self) = @_;
***************
*** 53,57 ****
  }
  
! sub save_stop_words
  {
      my ($self) = @_;
--- 53,57 ----
  }
  
! sub save_stopwords
  {
      my ($self) = @_;
***************
*** 136,140 ****
      if ( $stopword ne '' ) {
          $self->{stop__}{$stopword} = 1;
!         $self->save_stop_words();
  
         return 1;
--- 136,140 ----
      if ( $stopword ne '' ) {
          $self->{stop__}{$stopword} = 1;
!         $self->save_stopwords();
  
         return 1;
***************
*** 152,156 ****
      if ( $stopword ne '' ) {
          delete $self->{stop__}{$stopword};
!         $self->save_stop_words();
  
          return 1;
--- 152,156 ----
      if ( $stopword ne '' ) {
          delete $self->{stop__}{$stopword};
!         $self->save_stopwords();
  
          return 1;