diff --git a/build/check_embedded.pl b/build/check_embedded.pl
index 69291d95..01c74604 100755
--- a/build/check_embedded.pl
+++ b/build/check_embedded.pl
@@ -209,7 +209,7 @@ sub comment {
 			
 			if (/Not Before: (.*)$/) {
 				$notBefore = $1;
-				$noteBeforeTime = str2time($notBefore);
+				$notBeforeTime = str2time($notBefore);
 				next;
 			}
 
@@ -399,7 +399,7 @@ sub comment {
 			# Complain about keys with an excessive cryptoperiod (more than
 			# some given number of years).
 			#
-			my $validYears = ($notAfterTime - $noteBeforeTime)/(86400.0*365.0);
+			my $validYears = ($notAfterTime - $notBeforeTime)/(86400.0*365.0);
 			my $years = sprintf "%.1f", $validYears;
 			if ($validYears >= $excessThreshold) {
 				warning("excess cryptoperiod $years years for 1024-bit key; expires $notAfter");
diff --git a/charting/shortkeys_inner.pl b/charting/shortkeys_inner.pl
index bbf780f2..e1465f5d 100755
--- a/charting/shortkeys_inner.pl
+++ b/charting/shortkeys_inner.pl
@@ -227,7 +227,7 @@ sub comment {
 			
 			if (/Not Before: (.*)$/) {
 				$notBefore = $1;
-				$noteBeforeTime = str2time($notBefore);
+				$notBeforeTime = str2time($notBefore);
 			}
 
 			if (/Not After : (.*)$/) {
@@ -278,7 +278,7 @@ sub comment {
 			# Complain about keys with an excessive cryptoperiod (more than
 			# about three years).
 			#
-			my $validYears = ($notAfterTime - $noteBeforeTime)/(86400.0*365.0);
+			my $validYears = ($notAfterTime - $notBeforeTime)/(86400.0*365.0);
 			my $years = sprintf "%.1f", $validYears;
 			if ($validYears >= $excessThreshold) {
 				error("excess cryptoperiod $years years expires $notAfter");