     (when (or (null modname) (string= modname ""))
       (error "No Erlang module name given"))
     (cond ((fboundp 'Man-notify-when-ready)
-           ;; Emacs 19:  The man command could possibly start an
+           ;; From Emacs 19:  The man command could possibly start an
            ;; asynchronous process, i.e. we must hook ourselves into
            ;; the system to be activated when the man-process
            ;; terminates.

  (require 'man)
  (setq name (or name
                 (erlang-default-function-or-module)))
  (erlang-man-function-display-man-page name)
  (sleep-for 0 600)
  ;; A hack to make sure that the function scrolls
  ;; to the description of the function when it is
  ;; the first time that the man page for a module
  ;; is opened
  (erlang-man-function-display-man-page name))



          (t
           (erlang-man-module modname)
           (when funcname
             (erlang-man-repeated-search-for-function nil
                                                      funcname
                                                      modname))))))

(defun erlang-man-function (&optional name)
  "Find manual page for NAME, where NAME is module:function.
