Sfoglia il codice sorgente

Only delay a few seconds while waiting for files to load -- we would rather re-launch than fill our socket buffer/etc.

Zachary Kotlarek 13 anni fa
parent
commit
b2d7cfb0fe
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      dmx/Audio.pm

+ 1 - 1
dmx/Audio.pm

@@ -270,7 +270,7 @@ sub load($) {
 
 
 	# Wait for QT to load the new file
 	# Wait for QT to load the new file
 	my @cmd = ('tell application "QuickTime Player"');
 	my @cmd = ('tell application "QuickTime Player"');
-	push(@cmd, 'set endDate to current date + (0.5 * minutes)');
+	push(@cmd, 'set endDate to current date + (3/60 * minutes)');
 	push(@cmd, 'repeat while (count items of every document) <= ' . $count . ' and current date < endDate');
 	push(@cmd, 'repeat while (count items of every document) <= ' . $count . ' and current date < endDate');
 	push(@cmd, 'delay 0.1');
 	push(@cmd, 'delay 0.1');
 	push(@cmd, 'end repeat');
 	push(@cmd, 'end repeat');