--- loncom/lond	2023/07/09 00:46:44	1.489.2.43.2.8
+++ loncom/lond	2023/12/29 20:10:17	1.489.2.43.2.10
@@ -2,7 +2,7 @@
 # The LearningOnline Network
 # lond "LON Daemon" Server (port "LOND" 5663)
 #
-# $Id: lond,v 1.489.2.43.2.8 2023/07/09 00:46:44 raeburn Exp $
+# $Id: lond,v 1.489.2.43.2.10 2023/12/29 20:10:17 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -63,7 +63,7 @@ my $DEBUG = 0;		       # Non zero to ena
 my $status='';
 my $lastlog='';
 
-my $VERSION='$Revision: 1.489.2.43.2.8 $'; #' stupid emacs
+my $VERSION='$Revision: 1.489.2.43.2.10 $'; #' stupid emacs
 my $remoteVERSION;
 my $currenthostid="default";
 my $currentdomainid;
@@ -4941,7 +4941,7 @@ sub lti_handler {
 #  Side effects:
 #     The reply will contain the LTI payload, as & separated key=value pairs,
 #     where value is itself a frozen hash, if the required key and secret
-#     for the apecific tool ID are available. The payload data are retrieved from
+#     for the specific tool ID are available. The payload data are retrieved from
 #     a call to Lond::sign_lti_payload(), and the reply is encrypted before being
 #     written to $client.
 #
@@ -8284,6 +8284,9 @@ sub currentversion {
     if (-e $ulsdir) {
 	if(-d $ulsdir) {
 	    if (opendir(LSDIR,$ulsdir)) {
+                if (-e $fname) {
+                    $version=0;
+                }
 		my $ulsfn;
 		while ($ulsfn=readdir(LSDIR)) {
 # see if this is a regular file (ignore links produced earlier)