Function: majutsu-blob-previous
majutsu-blob-previous is an interactive and natively compiled function
defined in majutsu-file.el.
Signature
(majutsu-blob-previous)
Documentation
Visit previous blob that modified current file.
Key Bindings
majutsu-blob-mode-map p
Source Code
;; Defined in /nix/store/jagqw3nms546pad0gxi5f3wsckk6pji7-emacs-packages-deps/share/emacs/site-lisp/majutsu-file.el
(defun majutsu-blob-previous ()
"Visit previous blob that modified current file."
(interactive)
(unless (and majutsu-buffer-blob-revision majutsu-buffer-blob-path)
(user-error "Not in a blob buffer"))
(let* ((root majutsu-buffer-blob-root)
(from-rev majutsu-buffer-blob-revision)
(path majutsu-buffer-blob-path)
(line (line-number-at-pos))
(col (current-column)))
(if-let* ((prev (majutsu-file-prev-change from-rev path)))
(let ((target-line (majutsu-diff-visit--offset root path from-rev prev line)))
(majutsu-find-file prev path)
(majutsu-file--goto-line-col target-line col)
(majutsu-blob--show-commit-info prev))
(user-error "You have reached the beginning of time"))))