Description:
------------
When Using the getWeeksInMonth() method of the PEAR::Date class, ocassionally the calculation is wrong. The following code shows that July/2003 returns 6 weeks in the month, instead of 5.

This error was duplicated with the same code on a RedHat 7.3 box as well.

Reproduce code:
---------------
require_once 'Date.php';
$date = new Date ( mktime ( 0 , 0 , 0 , 6 , 1 , 2003 ) );
echo "Date: " . $date->getDate () . "<br>\nWeeks In Month: " . $date->getWeeksInMonth ();

Expected result:
----------------
Date: 2003-06-01 00:00:00
Weeks In Month: 5 

Actual result:
--------------
Date: 2003-06-01 00:00:00
Weeks In Month: 6