X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=d26795c406a3921c3387a2e6e08f87b4992ac6d2;hb=61148e50735498a356ffd95b5a79faf1dc6b9d82;hp=9791850521d5fbb00ac2ba190223fe9436ce91d5;hpb=cb340a0cf45f789d95201e4d4b9aec4ed581622d;p=spider.git diff --git a/perl/DXProt.pm b/perl/DXProt.pm index 97918505..d26795c4 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -63,7 +63,7 @@ $last10 = $last_pc50 = time; $ann_to_talk = 1; $rspfcheck = 1; $eph_restime = 180; -$eph_info_restime = 15*60; +$eph_info_restime = 60*60; $eph_pc34_restime = 30; @checklist = @@ -1966,5 +1966,10 @@ sub eph_list } return @out; } + +sub run_cmd +{ + goto &DXCommandmode::run_cmd; +} 1; __END__