# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1558395504 14400
# Node ID 8f0891b016637651db0477c751dd3ef0dcacc30f
# Parent  1b2269fb3ada1f450215b3a0674f5eb48716f4b8
Fix

diff -r 1b2269fb3ada -r 8f0891b01663 lisp/example.lisp
--- a/lisp/example.lisp	Sat May 18 13:30:26 2019 -0400
+++ b/lisp/example.lisp	Mon May 20 19:38:24 2019 -0400
@@ -31,7 +31,7 @@
     :short #\n
     :parameter "NAME"
     :initial-value *default-name*
-    :reduce #'adopt:newest))
+    :reduce #'adopt:last))
 
 (defparameter *ui*
   (adopt:make-interface