Sync up with egg-980627.

[elisp/egg.git] / its.el

diff --git a/its.el b/its.el
index 513e392..b01b06b 100644 (file)
--- a/its.el
+++ b/its.el
@@ -1101,5 +1101,18 @@ Return last state."
     (setq its-previous-select-func nil)
     (its-set-mode-line-title)))
 
+(defun its-mode ()
+  "\\{its-mode-map}"
+  ;; dummy function to get docstring
+  )
+
+(defun its-mode-help-command ()
+  "Display documentation for ITS mode."
+  (interactive)
+  (with-output-to-temp-buffer "*Help*"
+    (princ "ITS mode:\n")
+    (princ (documentation 'its-mode))
+    (help-setup-xref (cons #'help-xref-mode (current-buffer)) (interactive-p))))
+
 (provide 'its)
 ;;; its.el ends here.