1
0
Fork 0

Compare commits

..

4 commits

Author SHA1 Message Date
ec54fa9d04 Ignore any ‘.elc’ files 2023-05-25 15:47:22 -07:00
c2f624bf89 Remove oni-markdown package
It's just an empty file on my disk that hasn't been committed.
2023-05-25 15:46:36 -07:00
60b361fdae Fix variable reference
Oops, must have accidentally screwed this up when I changed the name. Will
probably move the guile code into its own file at some point, though.
2023-05-25 15:45:57 -07:00
09615b953a [oni-core] Require ‘consult’ when byte-compiling ‘oni-core’
When everything is interpreted it all works fine because ‘consult’ is loaded
before the ‘with-eval-after-load’ part is run, but when byte compiling the byte
compiler doesn't know that ‘consult-customize’ is a macro unless ‘consult’ is
loaded, which it isn't when Guix compiles it.

When it's byte-compiled as if it's a function ‘consult-buffer’ is assumed to be
a variable that's passed in, so I'm guessing it's trying to dereference it first
before passing it on to a non-existent function? But of course ‘consult-buffer’
is only a function (Emacs Lisp is a Lisp-2 after all), so it fails, but only
when byte compiled (and even only when byte-compiled in a clean environment
where there are no packages loaded that aren't explicity said to be).

Hopefully this fixes my issue with being unable to switch buffers until I
explicitly load ‘consult’.
2023-05-25 15:29:42 -07:00
3 changed files with 6 additions and 8 deletions

1
.gitignore vendored
View file

@ -4,3 +4,4 @@
/*/.eldev/
generated-config.yml*
*.elc

View file

@ -31,7 +31,7 @@ define GUILE_MODULE
(loop (read-line p)))))))))
endef
$(guile GUILE_MODULE))
$(guile $(GUILE_MODULE))
define upload =
emacs --quick --batch \
@ -287,9 +287,6 @@ bin/$(guile (get-module-version "oni-magit")): oni-magit.el
bin/$(guile (get-module-version "oni-makefile")): oni-makefile.el
$(call upload,\"$<\")
bin/$(guile (get-module-version "oni-markdown")): oni-markdown.el
$(call upload,\"$<\")
bin/$(guile (get-module-version "oni-notmuch")): oni-notmuch.el
$(call upload,\"$<\")

View file

@ -4,7 +4,7 @@
;; Author: Tom Willemse <tom@ryuslash.org>
;; Keywords: local
;; Version: 2023.0524.235720
;; Version: 2023.0525.151855
;; Package-Requires: (oni-data-dir oni-embrace oni-hydra expand-region multiple-cursors gcmh diminish ws-butler which-key insert-char-preview mixed-pitch ace-window vertico marginalia orderless consult embark docstr mini-frame)
;; This program is free software; you can redistribute it and/or modify
@ -450,14 +450,14 @@ _s_: String list"
:enabled buffer-file-name
:action find-file))
(defun oni-core-remove-consult-buffer-preview ()
(consult-customize consult-buffer :preview-key nil))
(eval-when-compile
(require 'consult))
(with-eval-after-load 'consult
(with-eval-after-load 'related-files
(add-to-list 'consult-buffer-sources 'oni-core-related-places-source))
(oni-core-remove-consult-buffer-preview))
(consult-customize consult-buffer :preview-key nil))
;;; Embark