From 07200f06b8a3f19ddccf471704a7bd5c1d554f0e Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Sun, 13 Mar 2005 19:52:34 +0000
Subject: [PATCH] use WCY::r if recent enough and available

---
 cmd/show/muf.pl | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/cmd/show/muf.pl b/cmd/show/muf.pl
index 488ad8df..31bebfee 100644
--- a/cmd/show/muf.pl
+++ b/cmd/show/muf.pl
@@ -68,7 +68,12 @@ if ($lp) {
 my ($hr1, $day, $month) = (gmtime($main::systime))[2,3,4];
 $month++;
 my $flux = Geomag::sfi;
-my $ssn = Minimuf::spots($flux);
+my $ssn;
+if ($main::systime - $WCY::date < 86400) {
+	$ssn = $WCY::r
+} else {
+	$ssn = Minimuf::spots($flux);
+}
 
 my $theta;						# path angle (rad) 
 $theta=$lon1-$lon2;
-- 
2.34.1