   (interactive)
   (let ((info (svn-status-get-line-information)))
     (if info
-        (message "%S %S %S" info (svn-status-line-info->hide-because-unknown info)
-                                 (svn-status-line-info->hide-because-unmodified info))
+        (message "%S hide-because-unknown: %S hide-because-unmodified: %S" info
+                 (svn-status-line-info->hide-because-unknown info)
+                 (svn-status-line-info->hide-because-unmodified info))
       (message "No file on this line"))))
 
 (defun svn-status-ensure-cursor-on-file ()

         (mark-count 0)
         (line-info (svn-status-get-line-information))
         (file-name (svn-status-line-info->filename line-info))
         (sub-file-regexp (concat "^" (regexp-quote
                                       (file-name-as-directory file-name))))
         (newcursorpos-fname)
         (i-fname)
         (first-line t)

                                  locked-mark
                                  with-history-mark
                                  switched-mark
                                  locked-repo-mark
                                  psvn-extra-info)
  "Create a new line-info from the given arguments
Anything left nil gets a sensible default.
nb: LOCKED-MARK refers to the kind of locks you get after an error,
