-; (defun wl-thread-goto-bottom-of-sub-thread ()
-; (interactive)
-; (let ((depth (wl-thread-get-depth-of-current-line)))
-; (forward-line 1)
-; (while (and (not (eobp))
-; (> (wl-thread-get-depth-of-current-line)
-; depth))
-; (forward-line 1))
-; (beginning-of-line)))
+;; (defun wl-thread-goto-bottom-of-sub-thread ()
+;; (interactive)
+;; (let ((depth (wl-thread-get-depth-of-current-line)))
+;; (forward-line 1)
+;; (while (and (not (eobp))
+;; (> (wl-thread-get-depth-of-current-line)
+;; depth))
+;; (forward-line 1))
+;; (beginning-of-line)))