style(elisp): clear defcustom-group and dead-local byte-compile warnings

Add :type and a containing :group to the three localrepo defcustoms (new localrepo defgroup) and to cj/org-agenda-window-height. Drop the unused `initial` local in the org-contacts completion-at-point function.

Claude-Session: https://claude.ai/code/session_01BqrdWUo9GcznYX2pZr76gZ

3 files changed, 15 insertions, 5 deletions

diff --git a/modules/local-repository.el b/modules/local-repository.el
index b97b74f41..6376d9f73 100644
--- a/modules/local-repository.el
+++ b/modules/local-repository.el
@@ -25,23 +25,33 @@
 
 ;; ------------------------------- Customizations ------------------------------
 
+(defgroup localrepo nil
+  "Local last-known-good package repository."
+  :group 'package)
+
 (defcustom localrepo-repository-id "localrepo"
   "The name used to identify the local repository internally.
 
-Used for the package-archive and package-archive-priorities lists.")
+Used for the package-archive and package-archive-priorities lists."
+  :type 'string
+  :group 'localrepo)
 
 (defcustom localrepo-repository-priority 100
   "The value for the local repository in the package-archive-priority list.
 
 A higher value means higher priority. If you want your local packages to be
-preferred, this must be a higher number than any other repositories.")
+preferred, this must be a higher number than any other repositories."
+  :type 'integer
+  :group 'localrepo)
 
 (defcustom localrepo-repository-location
   (concat user-emacs-directory "/.localrepo")
   "The location of the local repository.
 
 It's a good idea to keep this with the rest of your configuration files and
-keep them in source control.")
+keep them in source control."
+  :type 'directory
+  :group 'localrepo)
 
 (defun cj/update-localrepo-repository ()
   "Update the local repository with currently installed packages."
diff --git a/modules/mu4e-org-contacts-integration.el b/modules/mu4e-org-contacts-integration.el
index 6aed3d4cf..daa12701a 100644
--- a/modules/mu4e-org-contacts-integration.el
+++ b/modules/mu4e-org-contacts-integration.el
@@ -32,7 +32,6 @@ This function is designed to work with mu4e's compose buffers."
                     (re-search-backward "\\(\\`\\|[\n:,]\\)[ \t]*" nil t)
                     (goto-char (match-end 0))
                     (point)))
-           (initial (buffer-substring-no-properties start end))
            (contacts (cj/get-all-contact-emails)))
       (when contacts
         (list start end
diff --git a/modules/org-agenda-config.el b/modules/org-agenda-config.el
index e20c7a6b5..3234cc929 100644
--- a/modules/org-agenda-config.el
+++ b/modules/org-agenda-config.el
@@ -59,7 +59,8 @@
 
 (defcustom cj/org-agenda-window-height 0.75
   "Fraction of the selected frame used for the org agenda window."
-  :type 'number)
+  :type 'number
+  :group 'org-agenda)
 
 (defun cj/--org-agenda-display-rule ()
   "Return the display-buffer rule for the org agenda buffer."