corfu-global-mode -> global-corfu-mode

diff --git a/.emacs.d/esy.org b/.emacs.d/esy.org
index 0649b8f88ebe9adb9a1122097ef3c9e0a3f26390..e17a84c275082f022a7fe5a95de181cd6cfd54b0 100644 (file)
--- a/.emacs.d/esy.org
+++ b/.emacs.d/esy.org
@@ -36,20 +36,40 @@ restarts. See also [[#bootstrap][Literate config bootstrap]].
 :CUSTOM_ID: header
 :END:
 
-For further information, see [[info:elisp#Library Headers][elisp#Library Headers]].
+For further information about Elisp headers, see [[info:elisp#Library
+ Headers][elisp#Library Headers]].
 
 #+begin_src emacs-lisp
   ;;; esy.el --- GNU Emacs configuration -*- lexical-binding: t -*-
+
+  ;; Copyright (C) 2021-2022 Eshel Yaron
+
+  ;; Author: Eshel Yaron <eshelshay.yaron@gmail.com>
+  ;; URL: https://eshelyaron.com/esy.html
+
+  ;; This file is free software: you can redistribute it and/or modify it
+  ;; under the terms of the GNU General Public License as published by the
+  ;; Free Software Foundation, either version 3 of the License, or (at
+  ;; your option) any later version.
+
+  ;; This file is distributed in the hope that it will be useful, but
+  ;; WITHOUT ANY WARRANTY; without even the implied warranty of
+  ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+  ;; General Public License for more details.
+
+  ;; You should have received a copy of the GNU General Public License
+  ;; along with this file.  If not, see <http://www.gnu.org/licenses/>.
+
   ;;; Package-Requires: ((emacs "29"))
   ;;; Commentary: Tangled version of esy.org
   ;;; Code:
 #+end_src
 
-* Set a higher GC threshold during initialization
+* Allow for more memory usage during initialization
 
 #+begin_src emacs-lisp
   (let ((normal-gc-cons-threshold (* 20 1024 1024))
-        (init-gc-cons-threshold (* 128 1024 1024)))
+        (init-gc-cons-threshold (* 1024 1024 1024)))
     (setq gc-cons-threshold init-gc-cons-threshold)
     (add-hook 'emacs-startup-hook
               (lambda () (setq gc-cons-threshold normal-gc-cons-threshold))))
@@ -364,7 +384,7 @@ For further information, see [[info:elisp#Library Headers][elisp#Library Headers
     (require 'project)
     (let* ((projects
             (org-map-entries `(lambda () (nth 4 (org-heading-components)))
-                             "+project+LEVEL=2" '(esy/inbox-path)))
+                             "+project+LEVEL=2" `(,esy/inbox-path)))
            (choice (completing-read "Project: "
                                     projects
                                     nil
@@ -738,13 +758,13 @@ For further information, see [[info:elisp#Library Headers][elisp#Library Headers
           completion-auto-select nil
           completion-styles '(basic orderless)
           completion-show-help nil
-          completions-header-format nil
+    ;     completions-header-format nil  Not setting this for now due to Emacs bug#55289
           completion-auto-help 'visual
           completions-max-height 16
           completion-wrap-movement t)
     (define-key minibuffer-local-completion-map [remap previous-line] #'minibuffer-previous-completion)
     (define-key minibuffer-local-completion-map [remap next-line] #'minibuffer-next-completion)
-    (corfu-global-mode)
+    (global-corfu-mode)
     (marginalia-mode)
     (add-to-list 'completion-at-point-functions #'cape-file)
     (add-to-list 'completion-at-point-functions #'cape-dabbrev)