summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--demo/listEdit.ur7
1 files changed, 1 insertions, 6 deletions
diff --git a/demo/listEdit.ur b/demo/listEdit.ur
index 5b45d9a2..e75f2d04 100644
--- a/demo/listEdit.ur
+++ b/demo/listEdit.ur
@@ -37,12 +37,7 @@ fun main () =
val cons = Cons {Data = data, NewData = ndata, Tail = tail'}
in
set tail cons;
- set tailP tail';
-
- head' <- get head;
- case head' of
- Nil => set head cons
- | _ => return ()
+ set tailP tail'
end
in
return <xml><body>