Function: majutsu-row--normalize-columns
majutsu-row--normalize-columns is a natively compiled function defined
in majutsu-row.el.
Signature
(majutsu-row--normalize-columns PROFILE)
Documentation
Normalize and validate PROFILE's flat row columns.
Source Code
;; Defined in /nix/store/jagqw3nms546pad0gxi5f3wsckk6pji7-emacs-packages-deps/share/emacs/site-lisp/majutsu-row.el
(defun majutsu-row--normalize-columns (profile)
"Normalize and validate PROFILE's flat row columns."
(let ((seen (make-hash-table :test #'equal)))
(mapcar
(lambda (spec)
(let* ((column (majutsu-row-normalize-column-spec profile spec))
(key (list (plist-get column :field)
(plist-get column :module))))
(when (gethash key seen)
(user-error "Duplicate row column %S/%S" (car key) (cadr key)))
(puthash key t seen)
column))
(majutsu-row--profile-columns profile))))