[Jifty-commit] r3094 - in jifty/trunk: .

jifty-commit at lists.jifty.org jifty-commit at lists.jifty.org
Wed Apr 4 01:59:51 EDT 2007


Author: jesse
Date: Wed Apr  4 01:59:46 2007
New Revision: 3094

Modified:
   jifty/trunk/   (props changed)
   jifty/trunk/doc/talks/present-slides

Log:
 r54440 at pinglin-2:  jesse | 2007-04-04 14:56:43 +0900
 * Autoopen the presenter tools
 


Modified: jifty/trunk/doc/talks/present-slides
==============================================================================
--- jifty/trunk/doc/talks/present-slides	(original)
+++ jifty/trunk/doc/talks/present-slides	Wed Apr  4 01:59:46 2007
@@ -16,6 +16,9 @@
 select($next_slide);
 $| = 1;
 select(STDOUT);
+
+my $cmd = q{ osascript -e ' tell application "Terminal"' -e ' do script "tail -f /tmp/next_slide"' -e 'end tell' };
+system($cmd);
 while ( $counter <= $#SLIDES ) {
     my $mode = 'text';
     my ( $cols, $rows, undef, undef ) = GetTerminalSize();
@@ -23,7 +26,7 @@
 
     print $next_slide Term::ANSIScreen::cls;
     print $next_slide locate(1,1);
-    print $next_slide colored("Time: ".scalar localtime  ."\n", 'blue');
+    print $next_slide colored("Time: ".scalar localtime()  ."\n", 'blue');
     print $next_slide colored("Back 1\n", 'red');
     print $next_slide $SLIDES[$counter-1] ."\n\n";
     print $next_slide colored("This slide, $counter/".$#SLIDES."\n", 'blue');


More information about the Jifty-commit mailing list