Update of /project/mcclim/cvsroot/mcclim/Examples In directory clnet:/tmp/cvs-serv22236
Modified Files: drawing-benchmark.lisp text-size-test.lisp Log Message: * text-size-test.lisp (com-update): Renamed to com-update-text-size-test.
* drawing-benchmark.lisp (com-update): Renamed to com-run-drawing-benchmark.
--- /project/mcclim/cvsroot/mcclim/Examples/drawing-benchmark.lisp 2006/05/07 19:47:19 1.1 +++ /project/mcclim/cvsroot/mcclim/Examples/drawing-benchmark.lisp 2006/05/09 20:07:54 1.2 @@ -90,6 +90,6 @@ (define-drawing-benchmark-command (com-quit-drawing-benchmark :menu "Quit") () (frame-exit *application-frame*))
-(define-drawing-benchmark-command (com-update :menu "Run") () +(define-drawing-benchmark-command (com-run-drawing-benchmark :menu "Run") () (run-drawing-benchmark *application-frame* (frame-standard-output *application-frame*))) --- /project/mcclim/cvsroot/mcclim/Examples/text-size-test.lisp 2006/04/19 11:43:31 1.2 +++ /project/mcclim/cvsroot/mcclim/Examples/text-size-test.lisp 2006/05/09 20:07:54 1.3 @@ -109,6 +109,6 @@ (define-text-size-test-command (com-quit-text-size-test :menu "Quit") () (frame-exit *application-frame*))
-(define-text-size-test-command (com-update :menu "Update") () +(define-text-size-test-command (com-update-text-size-test :menu "Update") () (display-canvas *application-frame* (frame-standard-output *application-frame*)))