Function: majutsu-gerrit--project-from-remote-url

majutsu-gerrit--project-from-remote-url is a natively compiled function defined in majutsu-gerrit.el.

Signature

(majutsu-gerrit--project-from-remote-url REMOTE-URL)

Documentation

Extract Gerrit project path from REMOTE-URL.

Source Code

;; Defined in /nix/store/jagqw3nms546pad0gxi5f3wsckk6pji7-emacs-packages-deps/share/emacs/site-lisp/majutsu-gerrit.el
(defun majutsu-gerrit--project-from-remote-url (remote-url)
  "Extract Gerrit project path from REMOTE-URL."
  (cond
   ((not (stringp remote-url))
    nil)
   ((let* ((parsed (url-generic-parse-url remote-url))
           (scheme (url-type parsed)))
      (and scheme (not (string-empty-p scheme))))
    (replace-regexp-in-string
     "^/?\\(.*?\\)\\(?:\\.git/?\\)?$" "\\1"
     (or (url-filename (url-generic-parse-url remote-url)) "")))
   ((string-match "^\\(?:[^@]+@\\)?[^:]+:\\(.*?\\)\\(?:\\.git/?\\)?$" remote-url)
    (match-string 1 remote-url))))