aboutsummaryrefslogtreecommitdiff
path: root/vb/printer.vb
diff options
context:
space:
mode:
Diffstat (limited to 'vb/printer.vb')
-rw-r--r--vb/printer.vb4
1 files changed, 3 insertions, 1 deletions
diff --git a/vb/printer.vb b/vb/printer.vb
index 212b89c..3f3e6e2 100644
--- a/vb/printer.vb
+++ b/vb/printer.vb
@@ -22,7 +22,9 @@ Namespace Mal
print_readably As Boolean) As String
Dim strs As New List(Of String)
For Each entry As KeyValuePair(Of String, MalVal) In value
- If print_readably Then
+ If entry.Key.Length > 0 and entry.Key(0) = ChrW(&H029e) Then
+ strs.Add(":" & entry.Key.Substring(1))
+ Else If print_readably Then
strs.Add("""" & entry.Key.ToString() & """")
Else
strs.Add(entry.Key.ToString())