Function: majutsu-file--completion-suffix

majutsu-file--completion-suffix is a natively compiled function defined in majutsu-file.el.

Signature

(majutsu-file--completion-suffix ENTRY)

Documentation

Return aligned completion suffix for file ENTRY.

Source Code

;; Defined in /nix/store/jagqw3nms546pad0gxi5f3wsckk6pji7-emacs-packages-deps/share/emacs/site-lisp/majutsu-file.el
(defun majutsu-file--completion-suffix (entry)
  "Return aligned completion suffix for file ENTRY."
  (let ((status (plist-get entry :status))
        (file-type (or (plist-get entry :file-type) "file")))
    (majutsu-completion-annotation
     (majutsu-completion-column
      (if (plist-get entry :conflict) "conflict" file-type)
      10 (if (plist-get entry :conflict) 'warning 'majutsu-completion-key))
     (majutsu-completion-column
      status 10 (majutsu-file--completion-status-face status))
     (majutsu-completion-column
      (and (plist-get entry :executable) "executable")
      10 'majutsu-completion-type))))