 (eval-when-compile (require 'dired))
 (eval-when-compile (require 'ediff-util))
 (eval-when-compile (require 'elp))
+(eval-when-compile (require 'pp))
 
 (condition-case nil
     (progn

Run `svn-status' on the selected bookmark."
  (interactive
   (list
    (let ((completion-ignore-case t)
          (completion-function (if svn-status-use-ido-completion 'ido-completing-read 'completing-read)))
      (funcall completion-function "SVN status bookmark: " svn-bookmark-list))))
  (unless bookmark
    (error "No bookmark specified"))
  (let ((directory (cdr (assoc bookmark svn-bookmark-list))))

        if (listp item) nconc (svn-status-flatten-list item)
        else collect item))

(defun svn-status-completion-function ()
  (if svn-status-use-ido-completion 'ido-completing-read 'completing-read))

(defun svn-status-window-line-position (w)
  "Return the window line at point for window W, or nil if W is nil."
  (svn-status-message 3 "About to count lines; selected window is %s" (selected-window))
