*** bin/WBML.pm~	Sun Jun 18 00:45:00 2000
--- bin/WBML.pm	Sun Jun 18 22:00:00 2000
***************
*** 12,18 ****
  use Exporter;
  @ISA = qw(Exporter);
  
! $VERSION = '0.85';
  
  @EXPORT = qw(
  	name
--- 12,18 ----
  use Exporter;
  @ISA = qw(Exporter);
  
! $VERSION = '0.86';
  
  @EXPORT = qw(
  	name
***************
*** 296,302 ****
  	$self->{Type} = $other->{Type};
  	$self->{PostURL}  = $other->{PostURL};
  	$self->{Method}   = $other->{Method};
! 	$self->{FromDate} = $other->{FromDate};
  	$self->{TimeZone} = $other->{TimeZone};
  	%{$self->{Parser}} = %{$other->{Parser}};
  }
--- 296,302 ----
  	$self->{Type} = $other->{Type};
  	$self->{PostURL}  = $other->{PostURL};
  	$self->{Method}   = $other->{Method};
! 	$self->{FromDate} = $other->{FromDate}  unless (defined $self->{FromDate});
  	$self->{TimeZone} = $other->{TimeZone};
  	%{$self->{Parser}} = %{$other->{Parser}};
  }
*** lib/xnotes.pl~	Sun Jun 18 00:45:00 2000
--- lib/xnotes.pl	Sun Jun 18 22:00:00 2000
***************
*** 17,23 ****
  				$wbml_board = new WBML;
  				$wbml->thread($name, $wbml_board);
  				$wbml_board->name($name);
- 				$wbml_board->title($title);
  			} else {
  				$wbml_board = $wbml->thread($name);
  			}
--- 17,22 ----
***************
*** 25,36 ****
  			$wbml_board->idprefix($wbml->idprefix.$wbml_board->name);
  			$wbml_board->filename($wbml->filename."-".$wbml_board->name);
  			$wbml_board->lastid(0)  unless (defined $wbml_board->lastid);
  		} else {
  			next;
  		}
  		my $date = sprintf("%04d-%02d-%02d %02d:%02d:%02d",
  						   $current_year, $mon, $mday, $hour, $min, 0);
! 		if ($date lt $wbml->fromdate) {
  			$wbml_board->geturl(undef);
  		} else {
  			$wbml_board->geturl($wbml->geturl.$file);
--- 24,36 ----
  			$wbml_board->idprefix($wbml->idprefix.$wbml_board->name);
  			$wbml_board->filename($wbml->filename."-".$wbml_board->name);
  			$wbml_board->lastid(0)  unless (defined $wbml_board->lastid);
+ 			$wbml_board->title($title);
  		} else {
  			next;
  		}
  		my $date = sprintf("%04d-%02d-%02d %02d:%02d:%02d",
  						   $current_year, $mon, $mday, $hour, $min, 0);
! 		if ($date lt $wbml_board->fromdate) {
  			$wbml_board->geturl(undef);
  		} else {
  			$wbml_board->geturl($wbml->geturl.$file);