X-Git-Url: https://git.jsancho.org/?p=guile-click.git;a=blobdiff_plain;f=examples%2Fnested.scm;fp=examples%2Fnested.scm;h=3b07ae6497c19fcefd4a44ce09ef784d015d3fbc;hp=414e5896b931f0dd9db958f0c30e21b46b7263ca;hb=487cd0d4c6c0ee9681cc132e5316ded7fc5dd0f7;hpb=986fe49efb25343011f28262cd2b7afbf81dd78e diff --git a/examples/nested.scm b/examples/nested.scm index 414e589..3b07ae6 100755 --- a/examples/nested.scm +++ b/examples/nested.scm @@ -28,14 +28,14 @@ #:name "initdb" #:help "Init database." #:procedure (lambda () - (format #t "Initialized the database")))) + (format #t "Initialize the database.~%")))) (define dropdb (command #:name "dropdb" #:help "Drop database." #:procedure (lambda () - (format #t "Dropped the database")))) + (format #t "Drop the database.~%")))) (define cli (group