(est-format-unit): Format `omitted'.

diff --git a/est-format.el b/est-format.el
index e40b97e..667f816 100644 (file)
--- a/est-format.el
+++ b/est-format.el
@@ -132,6 +132,24 @@
                        children)))
          ))
        )
+       ((eq name 'omitted)
+       (cond
+        ((eq output-format 'wiki-text)
+         (setq output-string "{{...}}")
+         )
+        ((and (eq output-format 'html)
+              (setq object (plist-get props :object))
+              (setq feature (plist-get props :feature)))
+         (setq children
+               (list
+                (list* 'a
+                       (list :href
+                             (concat (www-uri-make-object-url object)
+                                     "&feature="
+                                     (www-uri-encode-feature-name feature)))
+                       children)))
+         ))
+       )
        ((eq name 'feature-name)
        (setq name 'span)
        (when (eq output-format 'html)