diff --git a/scm/html/man.scm b/scm/html/man.scm
index 24bc4d0..b59f606 100644
--- a/scm/html/man.scm
+++ b/scm/html/man.scm
@@ -332,6 +332,17 @@
         (concat (hang-para #f) "<br>\n"))))
 
 
+;;; --------------------------------------------------------------------------
+;;; Internet URIs.
+
+(defmacro 'UR
+  (lambda (UR uri)
+    (format #f "<a href=\"~a\"><code>~a</code></a>" uri uri)))
+
+(defmacro 'UE
+  (lambda (UE . words)
+    (parse (apply spread words) #\newline)))
+
 
 ;;; --------------------------------------------------------------------------
 ;;; Bogus or SunOS-specific stuff.