doomemacs/modules/tools/prodigy/config.el

;;; tools/prodigy/config.el -*- lexical-binding: t; -*-

(after! prodigy
  (defadvice! +prodigy--add-project-property-a (fn &rest args)
    "Adds a new :project property to prodigy services, which hides the service
unless invoked from the relevant project."
    :around #'prodigy-services
    (let ((project-root (downcase (or (doom-project-root) default-directory)))
          (services (apply fn args)))
      (if current-prefix-arg
          services
        (cl-remove-if-not (lambda (service)
                            (let ((project (plist-get service :project)))
                              (or (not project)
                                  (file-in-directory-p project-root project))))
                          services))))

  (define-key prodigy-mode-map "d" #'+prodigy/delete))
Move :feature services => :tools prodigy 2018-05-16 22:40:33 +02:00			`;;; tools/prodigy/config.el -- lexical-binding: t; --`
Replace tools/prodigy with feature/services 2017-09-23 14:51:57 +02:00
Major refactor & optimization of how modules load their packages Now that we are loading package autoloads files (as part of the generated doom-package-autoload-file when running make autoloads), many :commands properties are redundant. In fact, many def-package! blocks are redundant. In some cases, we can do without a config.el file entirely, and can move into the autoloads file or rely entirely on package autoloads. Also, many settings have been moved in their module's autoloads files, which makes them available ASAP; their use no longer depends on module load order. This gained me a modest ~10% boost in startup speed. 2018-05-25 00:46:11 +02:00			`(after! prodigy`
refactor: rename orig-fn arg in advice to fn A minor tweak to our naming conventions for the first argument of an :around advice. 2021-08-04 01:18:06 -04:00			`(defadvice! +prodigy--add-project-property-a (fn &rest args)`
tools/prodigy: conform to new conventions 2019-07-22 23:59:25 +02:00			`"Adds a new :project property to prodigy services, which hides the service`
			`unless invoked from the relevant project."`
			`:around #'prodigy-services`
			`(let ((project-root (downcase (or (doom-project-root) default-directory)))`
refactor: rename orig-fn arg in advice to fn A minor tweak to our naming conventions for the first argument of an :around advice. 2021-08-04 01:18:06 -04:00			`(services (apply fn args)))`
tools/prodigy: conform to new conventions 2019-07-22 23:59:25 +02:00			`(if current-prefix-arg`
			`services`
			`(cl-remove-if-not (lambda (service)`
			`(let ((project (plist-get service :project)))`
			`(or (not project)`
			`(file-in-directory-p project-root project))))`
			`services))))`
Replace tools/prodigy with feature/services 2017-09-23 14:51:57 +02:00
Minimize dependence on map! This is in preparation for general.el integration coming in 2.1.1. It is very likely that map! will change (and even more, be split into several macros). Not much, but change none-the-less. Specifically, the state keywords (e.g. :nvi, :n, :i) will be removed in favor of a :state property that takes a list, e.g. (normal visual insert). In any case, both map! and general are also relatively expensive compared to define-key and evil-define-key* (and the new define-key! macro), so use that when we can. This also means changes to either API won't affect Doom's modules in the long term. 2018-06-03 15:46:00 +02:00			`(define-key prodigy-mode-map "d" #'+prodigy/delete))`
Replace tools/prodigy with feature/services 2017-09-23 14:51:57 +02:00