[popfile-commit] engine/UI HTML.pm,1.206,1.207

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

Update of /cvsroot/popfile/engine/UI
In directory sc8-pr-cvs1:/tmp/cvs-serv17232

Modified Files:
	HTML.pm 
Log Message:
Fix bug where deleting the last page of the history showed a blank history page

Index: HTML.pm
===================================================================
RCS file: /cvsroot/popfile/engine/UI/HTML.pm,v
retrieving revision 1.206
retrieving revision 1.207
diff -C2 -d -r1.206 -r1.207
*** HTML.pm	22 Sep 2003 13:27:22 -0000	1.206
--- HTML.pm	30 Sep 2003 20:09:29 -0000	1.207
***************
*** 3167,3170 ****
--- 3167,3176 ----
              }
          }
+ 
+         # Check that the start_message now exists, if not then go back a page
+ 
+         while ( ( $self->{form_}{start_message} + $self->config_( 'page_size' ) ) >= $self->history_size() ) {
+             $self->{form_}{start_message} -= $self->config_( 'page_size' );
+ 	}
      }