Author: wmb Date: Fri Aug 17 19:22:45 2012 New Revision: 3192 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3192
Log: OLPC camera test - removed an unnecessary call to full-brightness.
Modified: dev/olpc/cameratest.fth
Modified: dev/olpc/cameratest.fth ============================================================================== --- dev/olpc/cameratest.fth Fri Aug 17 19:20:39 2012 (r3191) +++ dev/olpc/cameratest.fth Fri Aug 17 19:22:45 2012 (r3192) @@ -13,9 +13,8 @@ : autobright ( -- ) read-agc 3 + 3 rshift h# f min " bright!" " $call-screen" evaluate ; -[then] - : full-brightness ( -- ) h# f " bright!" " $call-screen" evaluate ; +[then]
: timeout-read ( adr len timeout -- actual ) >r 0 -rot r> 0 ?do ( actual adr len ) @@ -47,7 +46,7 @@ false set-mirrored resync ( ) shoot-still ?dup if stop-display close exit then ( error? ) d# 1,000 ms - true set-mirrored resync shoot-movie full-brightness ( error? ) + true set-mirrored resync shoot-movie ( full-brightness ) ( error? ) stop-display close ( error? ) ?dup 0= if confirm-selftest? then ( error? ) ;