Function: majutsu--diff-revision-at-point

majutsu--diff-revision-at-point is a natively compiled function defined in majutsu-jj.el.

Signature

(majutsu--diff-revision-at-point)

Documentation

Return the revision implied by the current diff buffer, or nil.

Source Code

;; Defined in /nix/store/jagqw3nms546pad0gxi5f3wsckk6pji7-emacs-packages-deps/share/emacs/site-lisp/majutsu-jj.el
(defun majutsu--diff-revision-at-point ()
  "Return the revision implied by the current diff buffer, or nil."
  (and (derived-mode-p 'majutsu-diff-mode)
       (bound-and-true-p majutsu-buffer-diff-range)
       (let ((range majutsu-buffer-diff-range))
         (or (and (equal (car range) "-r") (cadr range))
             (when-let* ((arg (seq-find (lambda (item)
                                          (string-prefix-p "--revisions=" item))
                                        range)))
               (substring arg (length "--revisions=")))))))