Add checks for git status to ready_to_release.

ready_to_release

@@ -45,6 +45,15 @@ sub check_files {
 	if ($ver_version ne $news_version) {
 		error("$news_file: latest version comparision is for $news_version not $ver_version");
 	}
+	my $pull_out = `git pull --dry-run 2>&1 | grep ' ->'`;
+	if ($pull_out) {
+		error("git: need to pull");
+	}
+	my $stat_out = `git status | grep "Changes not staged for commit:"`;
+	if ($stat_out) {
+		error("git: need to commit changes");
+	}
+
 	if ($errors == 0) {
 		print "$ver_version ready for release\n";
 	} else {
@@ -58,7 +67,7 @@ sub read_version_c {
 	my $fd;
 	open $fd, '<', $version_c or die "cannot open $version_c: $!";
 	while (<$fd>) {
-		if (m|^\s*v([\d.]+)(\s.*)?|) {
+		if (m|^\s*v([\d.]+)(\s.*)?$|) {
 			$hi_version = $1;
 			$2 =~ m|^\s*(\d+)\s*/\s*(\d+)\s*/\s*(\d+)\s|;
 			($month, $day, $year) = ($1,$2,$3);