Exclude gh.el from autoloads

See sigma/gh.el#95

core/cli/autoloads.el

@@ -1,5 +1,19 @@
 ;;; core/cli/autoloads.el -*- lexical-binding: t; -*-
 
+(defvar doom-autoload-excluded-packages '("gh")
+  "Packages that have silly or destructive autoload files that try to load
+everyone in the universe and their dog, causing errors that make babies cry. No
+one wants that.")
+
+;; external variables
+(defvar autoload-timestamps)
+(defvar generated-autoload-load-name)
+(defvar generated-autoload-file)
+
+
+;;
+;;; Commands
+
 (def-command! (autoloads a) ()
   "Regenerates Doom's autoloads files.
 
@@ -12,11 +26,6 @@ It also caches `load-path', `Info-directory-list', `doom-disabled-packages',
 `package-activated-list' and `auto-mode-alist'."
   (doom-reload-autoloads nil 'force))
 
-;; external variables
-(defvar autoload-timestamps)
-(defvar generated-autoload-load-name)
-(defvar generated-autoload-file)
-
 
 ;;
 ;;; Helpers
@@ -308,6 +317,7 @@ Run this whenever your `doom!' block, or a module autoload file, is modified."
   "Concatenates package autoload files, let-binds `load-file-name' around
 them,and remove unnecessary `provide' statements or blank links."
   (dolist (pkg (straight--directory-files (straight--build-dir)))
+    (unless (member pkg doom-autoload-excluded-packages)
       (let ((file (straight--autoloads-file pkg)))
         (when (file-exists-p file)
           (insert-file-contents file)
@@ -321,7 +331,7 @@ them,and remove unnecessary `provide' statements or blank links."
           (while (re-search-forward "^\\(?:;;\\(.*\n\\)\\|\n\\|(provide '[^\n]+\\)" nil t)
             (unless (nth 8 (syntax-ppss))
               (replace-match "" t t)))
-        (unless (bolp) (insert "\n"))))))
+          (unless (bolp) (insert "\n")))))))
 
 (defun doom--generate-var-cache ()
   "Print a `setq' form for expensive-to-initialize variables, so we can cache