Added mouseover text.

[elpher.git] / elopher.el

diff --git a/elopher.el b/elopher.el
index 86e1950..cd1f7eb 100644 (file)
--- a/elopher.el
+++ b/elopher.el
@@ -42,7 +42,8 @@
     (insert (propertize display-string
                         'face '(foreground-color . "cyan")
                         'mouse-face 'highlight
-                        'help-echo "mouse-1: follow link"
+                        'help-echo (format "mouse-1: follow link to \"%s\" on %s port %s"
+                                           selector hostname port)
                         'keymap map))
     (insert "\n")))