emacs-exordium · Feb 27, 2025 · Feb 27, 2025 · Feb 27, 2025 · Feb 27, 2025 · Feb 27, 2025
diff --git a/.github/workflows/tests.yml b/.github/workflows/tests.yml
@@ -1,4 +1,4 @@
-name: CI Tests
+name: Exordium - CI Tests
 
 on:
   workflow_dispatch:
@@ -33,6 +33,7 @@ jobs:
           - 29.2
           - 29.3
           - 29.4
+          - 30.1
           - snapshot
     steps:
       - uses: purcell/setup-emacs@master
@@ -70,26 +71,26 @@ jobs:
 
       - name: 'Checkout checkdoc-batch'
         uses: actions/checkout@v4
-        if: contains(fromJSON('["29.4", "snapshot"]'), matrix.emacs_version)
+        if: contains(fromJSON('["29.4", "30.1", "snapshot"]'), matrix.emacs_version)
         with:
           repository: 'pkryger/ckeckdoc-batch.el'
           path: .emacs.d/checkdoc-batch
 
       - name: 'Lint: checkdoc'
-        if: contains(fromJSON('["29.4", "snapshot"]'), matrix.emacs_version)
+        if: contains(fromJSON('["29.4", "30.1", "snapshot"]'), matrix.emacs_version)
         run: '"${HOME}/.emacs.d/.ci/batch-checkdoc.sh"'
 
       - name: 'Lint: compilation' # Close to the end, to let other builds escape errors
                                   # caused by compilation shenanigans
-        if: contains(fromJSON('["29.4", "snapshot"]'), matrix.emacs_version)
+        if: contains(fromJSON('["29.4", "30.1", "snapshot"]'), matrix.emacs_version)
         run: '"${HOME}/.emacs.d/.ci/batch-byte-compile.sh"'
 
       - name: 'Lint: flycheck' # After compilation that should install all packages
-        if: contains(fromJSON('["29.4", "snapshot"]'), matrix.emacs_version)
+        if: contains(fromJSON('["29.4", "30.1", "snapshot"]'), matrix.emacs_version)
         run: '"${HOME}/.emacs.d/.ci/batch-flycheck.sh"'
 
       - name: 'Lint: relint'
-        if: contains(fromJSON('["29.4", "snapshot"]'), matrix.emacs_version)
+        if: contains(fromJSON('["29.4", "30.1", "snapshot"]'), matrix.emacs_version)
         run: '"${HOME}/.emacs.d/.ci/batch-relint.sh"'
 
   pkryger-taps:
@@ -102,6 +103,7 @@ jobs:
           - macos-latest
         emacs_version:
           - 29.4
+          - 30.1
           - snapshot
     steps:
       - uses: purcell/setup-emacs@master

diff --git a/README.md b/README.md
@@ -181,10 +181,17 @@ Keybinding              | Description
 
 Auto-complete/Company:
 
-Keybinding         | Description
--------------------|-----------------------------------------------------------
-<kbd>C-.</kbd>     | Force trigger auto-complete/company-complete.
-<kbd>ESC</kbd>     | Abort auto-complete/company-complete.
+Keybinding                          | Description
+------------------------------------|------------------------------------------------------------------------------------------
+<kbd>C-.</kbd>                      | Force trigger auto-complete/company-complete.
+<kbd>ESC</kbd>                      | Abort auto-complete/company-complete.
+<kbd>C-o</kbd> or <kbd>C-\\</kbd>   | Company only: switch to other backend (`company-other-backend`)
+<kbd>C-M-h</kbd>                    | Company only: show doc buffer for current candidate (`company-show-doc-buffer`)
+<kbd>C-M-v</kbd>                    | Company only: scroll doc buffer up (`scroll-other-window`)
+<kbd>C-M-S-v</kbd>                  | Company only: scroll doc buffer down (`scroll-other-window-down`)
+<kbd>C-h</kbd> or <kbd><f1></kbd>   | Company only: show quick help for current candidate (`company-posframe-quickhelp-toggle`)
+<kbd>C-S-v</kbd> or <kbd><f2></kbd> | Company only: scroll quick help up (`company-posframe-quickhelp-scroll-up`)
+<kbd>M-V</kbd> or <kbd><f3></kbd>   | Company only: scroll quick help down (`company-posframe-quickhelp-scroll-down`)
 
 Tip: if you are looking for a particular key and you know it starts with a
 given prefix, type the prefix followed by <kbd>C-h</kbd>: Emacs will display
@@ -452,9 +459,11 @@ Forge keys:
 
 Keybinding            | Description
 ----------------------|-----------------------------------------------------------
-<kbd>C-c C-p</kbd>    | in `forge-post-mode`: Preview post with markdown (`exordium-forge-markdown-preview`)
-<kbd>C-c C-d</kbd>    | in `forge-post-mode`: Submit current post (a Pull Request) as a draft (`exordium-forge-post-submit-draft`)
-<kbd>C-c C-d</kbd>    | in `magit-status-mode` and in `forge-topic-mode`: Mark a Pull Request at point as ready for review (`exordium-forge-mark-ready-for-rewiew`)
+<kbd>C-c M-p</kbd>    | in `forge-post-mode`: Preview post with markdown (`exordium-forge-markdown-preview`)
+<kbd>C-c M-d</kbd>    | in `forge-post-mode`: Show diff for pull request (`exordium-forge-diff-for-pullreq`)
+<kbd>C-c M-r</kbd>    | in `forge-post-mode`: Submit current post (a Pull Request) as a draft (`exordium-forge-post-submit-draft`)
+<kbd>C-c M-c</kbd>    | in `forge-post-mode`: Insert messages from all commits that are in this pull request (`exordium-forge-insert-pullreq-commit-messages`)
+<kbd>C-c M-r</kbd>    | in `magit-status-mode` and in `forge-topic-mode`: Mark a Pull Request at point as ready for review (`exordium-forge-mark-ready-for-rewiew`)
 
 
 Git gutter keys:

diff --git a/company-icons/LICENSE.txt b/company-icons/LICENSE.txt
@@ -0,0 +1,21 @@
+MIT License
+
+Copyright (c) 2024 GitHub Inc.
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in all
+copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+SOFTWARE.
diff --git a/company-icons/git-merge-16.svg b/company-icons/git-merge-16.svg
diff --git a/company-icons/git-pull-request-16.svg b/company-icons/git-pull-request-16.svg
diff --git a/company-icons/git-pull-request-closed-16.svg b/company-icons/git-pull-request-closed-16.svg
diff --git a/company-icons/git-pull-request-draft-16.svg b/company-icons/git-pull-request-draft-16.svg
diff --git a/company-icons/issue-closed-16.svg b/company-icons/issue-closed-16.svg
diff --git a/company-icons/issue-draft-16.svg b/company-icons/issue-draft-16.svg
diff --git a/company-icons/issue-opened-16.svg b/company-icons/issue-opened-16.svg
diff --git a/company-icons/people-16.svg b/company-icons/people-16.svg
diff --git a/company-icons/person-16.svg b/company-icons/person-16.svg
diff --git a/doc/code-organization.md b/doc/code-organization.md
@@ -11,6 +11,7 @@ The source code is in these directories:
 * *extensions*: third party packages not present in melpa, included in source
   code.
 * *snippets*: snippet files for YASnippets.
+* *company-icons*: icon files for Exordium provided Comany backends.
 
 Note: *vendor* should be removed (code should move to *extensions*).
 

diff --git a/init.el b/init.el
@@ -241,6 +241,21 @@ melpa-stable.")
 (exordium-require 'init-force-elpa)
 (exordium-require 'init-vc-checkout)
 
+;; Make sure summaries are generated for `package-vc-install' (and co.)
+;; functions, see https://debbugs.gnu.org/cgi/bugreport.cgi?bug=76065
+(defun exordium--package-vc-erase-summary (args)
+  "Set summary slot in (car ARGS) to nil."
+  (when-let* ((pkg-desc (car args))
+              ((package-desc-p pkg-desc))
+              ((equal package--default-summary (oref pkg-desc summary))))
+    (oset pkg-desc summary nil))
+  args)
+
+(when (and (require 'package-vc nil t) ;; Since Emacs-29
+           (version< emacs-version "30.2")) ;; Until Emacs-30.2
+  (advice-add 'package-vc--generate-description-file
+              :filter-args #'exordium--package-vc-erase-summary))
+
 ;; Pin user extra packages early, in case they are dependencies of some other
 ;; packages that are installed early.
 (dolist (pkg exordium-extra-pinned)