   (shell-command
    (format "%s -f %s/TAGS -e -R %s" path-to-ctags dir-name dir-name)))
 
-;;;###autoload
 (defun my-visit-project-tags (dir)
   (interactive (list (read-directory-name "Directory: "
                                           (my-project-root))))
     (my-visit-tags dir))
 
-;;;###autoload
 (defun my-visit-project-tags-np ()
   (interactive)
   (let ((tags-file (my-project-root)))

    (message "Building project tags")
    (my-visit-tags dir)))

;;;###autoload
(defun my-build-ruby-tags ()
  (interactive)
  (message "Building project tags")

;;; My tags <http://emacswiki.org/BuildTags#toc2>.

(defun my-build-tags ()
  (interactive)
  (let ((command "/usr/bin/ctags")
