diff lib/hr.pm @ 2:23970530a518 draft

master branch Updating with tag :CI_COMMIT_TAG - - Fxx
author fgiacomoni
date Tue, 17 Jan 2023 10:31:32 +0000
parents e2cbcf6fa22e
children 78afd7f439f3
line wrap: on
line diff
--- a/lib/hr.pm	Sun Dec 11 17:16:43 2022 +0000
+++ b/lib/hr.pm	Tue Jan 17 10:31:32 2023 +0000
@@ -77,7 +77,7 @@
     
     # suppl. atoms case
     foreach my $atom ( (split(",", $atomsupp )) ) {
-    	print "*** $atom***\n" ;
+    	#print "*** $atom***\n" ;
     	if ( exists $atomsconfig->{$atom} ) 	{ $atomsconfig->{$atom}{'max'} = $CONF->{'DEFAULT_MAX'} ; }
     	else {  print "*** $atom not recognized***\n" ; }