c7254e7bdc
+ enable lexical-scope everywhere (lexical-binding = t): ~5-10% faster startup; ~5-20% general boost + reduce consing, function calls & garbage collection by preferring cl-loop & dolist over lambda closures (for mapc[ar], add-hook, and various cl-lib filter/map/reduce functions) -- where possible + prefer functions with dedicated opcodes, like assq (see byte-defop's in bytecomp.el for more) + prefer pcase & cond (faster) over cl-case + general refactor for code readability + ensure naming & style conventions are adhered to + appease byte-compiler by marking unused variables with underscore + defer minor mode activation to after-init, emacs-startup or window-setup hooks; a customization opportunity for users + ensures custom functionality won't interfere with startup.
15 lines
687 B
EmacsLisp
15 lines
687 B
EmacsLisp
;;; lang/php/autoload.el -*- lexical-binding: t; -*-
|
|
|
|
(defvar +php-composer-conf (make-hash-table :test 'equal))
|
|
|
|
;;;###autoload
|
|
(defun +php-composer-conf (&optional project-root refresh-p)
|
|
"Retrieve the contents of composer.json as an alist. If REFRESH-P is non-nil
|
|
ignore the cache."
|
|
(let ((project-root (or project-root (doom-project-root))))
|
|
(or (and (not refresh-p) (gethash project-root +php-composer-conf))
|
|
(let ((package-file (expand-file-name "composer.json" project-root)))
|
|
(when-let (data (and (file-exists-p package-file)
|
|
(json-read-file package-file)))
|
|
(puthash project-root data +php-composer-conf))))))
|