From 41ffc15191d335fb3e17b23cd9a463009d289724 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Sun, 6 Jun 2021 23:26:28 -0500
Subject: Write function to require private.el

---
 gnus.el      | 2 +-
 init.el      | 2 +-
 lisp/acdw.el | 4 ++++
 3 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/gnus.el b/gnus.el
index d179937..31a06e0 100644
--- a/gnus.el
+++ b/gnus.el
@@ -17,7 +17,7 @@
 ;;; Code:
 
 ;;; Private files
-(require 'acdw-private)
+(acdw/require-private)
 
 ;;; Select Methods
 (setq gnus-select-method '(nnnil ""))
diff --git a/init.el b/init.el
index ac830c2..357f7da 100644
--- a/init.el
+++ b/init.el
@@ -46,7 +46,7 @@
   (normal-top-level-add-subdirs-to-load-path))
 
 ;;;; Private stuff
-(require 'acdw-private)
+(acdw/require-private)
 
 
 ;;;; Utility functions and variables
diff --git a/lisp/acdw.el b/lisp/acdw.el
index 48e754d..2f878a9 100644
--- a/lisp/acdw.el
+++ b/lisp/acdw.el
@@ -410,6 +410,10 @@ Prompt only if there are unsaved changes."
   (custom-set-faces '(fringe
                       ((t (:foreground "dim gray"))))))
 
+(defun acdw/require-private ()
+  "Require `acdw-private', which is in private.el."
+  (require 'acdw-private "private.el"))
+
 
 ;;; URL regexp
 ;; really, I just want to add gemini:// protocol, but I'm going to do some
-- 
cgit 1.4.1-21-gabe81