diff options
| author |  Benjamin Barenblat <bbaren@mit.edu> | 2013-04-30 13:38:02 -0400 |
|---|---|---|
| committer | Benjamin Barenblat <bbaren@mit.edu> | 2013-04-30 13:38:02 -0400 |
| commit | b2dc3a9199369af04cf3ee9db0d1ebb5576a594b (patch) | |
| tree | 538dc6f0a54cd47dfcab54adfb337608ad374382 /forum/asker.ur | |
| parent | 63fc8aaf40dfd70129a8d8ae1eed71b43c889591 (diff) | |
Forum: Rename “asker” to “author”
Diffstat (limited to 'forum/asker.ur')
| -rw-r--r-- | forum/asker.ur | 26 |
1 files changed, 0 insertions, 26 deletions
diff --git a/forum/asker.ur b/forum/asker.ur deleted file mode 100644 index 947f20c..0000000 --- a/forum/asker.ur +++ /dev/null @@ -1,26 +0,0 @@ -type asker = option string - -val eq_asker = Option.eq - -val show_asker = - mkShow ( - fn nameOpt => - case nameOpt of - None => "Anonymous" - | Some nam => nam - ) - -val read_asker = - let fun parse text = - case text of - "Anonymous" => None - | nam => Some nam - in - mkRead parse (compose Some parse) - end - -val sql_asker = sql_option_prim - -val anonymous = None - -val namedAsker = Some |