--- loncom/lonnet/perl/lonnet.pm	2022/10/07 14:31:28	1.1494
+++ loncom/lonnet/perl/lonnet.pm	2022/10/18 19:07:04	1.1495
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.1494 2022/10/07 14:31:28 raeburn Exp $
+# $Id: lonnet.pm,v 1.1495 2022/10/18 19:07:04 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -15557,7 +15557,7 @@ sub parse_getdns_url {
 	# get yesterday's info for fallback
 	my %old_name_to_ip;
 	my ($ip_info,$cached)=
-	    &s_cached_new('iphost','iphost');
+	    &is_cached_new('iphost','iphost');
 	if ($cached) {
 	    %old_name_to_ip = %{$ip_info->[1]};
 	}