Mercurial > urweb

diff src/source_print.sml @ 61:48b6d2c3df46

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
open
author Adam Chlipala <adamc@hcoop.net>
date Sun, 22 Jun 2008 19:34:35 -0400
parents abb2b32c19fb
children 9f89f0b00b84
line wrap: on
line diff
--- a/src/source_print.sml	Sun Jun 22 19:10:47 2008 -0400
+++ b/src/source_print.sml	Sun Jun 22 19:34:35 2008 -0400
@@ -356,6 +356,9 @@
                                  string ":",
                                  space,
                                  p_sgn sgn]
+      | DOpen (m, ms) => box [string "open",
+                              space,
+                              p_list_sep (string ".") string (m :: ms)]
 
 and p_str (str, _) =
     case str of