Method code for $data_lib.unparse_indent_html()

[Turn off line numbering]

---

  1: arg value;
  2: var chunk, chunk_out, out, object_parse, obj_regexp, line, word;
  3: 
  4: obj_regexp = "\$[a-zA-Z0-9_]+";
  5: out = [];
  6: value = .unparse_indent(value);
  7: value = value.mmap('html_escape);
  8: for line in (value) {
  9:     object_parse = line.global_regexp(obj_regexp);
 10:     chunk_out = "";
 11:     while (object_parse) {
 12:         [chunk, (word ?= 0), @object_parse] = object_parse;
 13:         chunk_out += chunk;
 14:         if (word) {
 15:             if ((| $object_lib.to_dbref(word) |))
 16:                 chunk_out += $page_bin_index._make_string_to_display_href(word);
 17:             else
 18:                 chunk_out += word;
 19:         }
 20:     }
 21:     out += [chunk_out];
 22: }
 23: return out;
 24: 
 25: // $#Edited: 21 Aug 97 21:22 $user_bruce
 26: // $#Edited: 21 Aug 97 21:27 $user_bruce

---

["// Created 07-Dec-1996 as a part of ColdCore, see: @help Credit"]