From 80aa0866807a46696426bc6485a041f46d8b3701 Mon Sep 17 00:00:00 2001
From: Henrik Lissner <henrik@lissner.net>
Date: Tue, 20 Mar 2018 21:20:45 -0400
Subject: [PATCH] APPEASE THE GREAT BYTE-COMPILER-SAMA

---
 modules/lang/org/+capture.el             | 2 +-
 modules/lang/org/autoload/org-capture.el | 2 ++
 modules/ui/posframe/autoload.el          | 9 ++++-----
 3 files changed, 7 insertions(+), 6 deletions(-)

diff --git a/modules/lang/org/+capture.el b/modules/lang/org/+capture.el
index 2859b4875..b8fe048b1 100644
--- a/modules/lang/org/+capture.el
+++ b/modules/lang/org/+capture.el
@@ -38,7 +38,7 @@
 
   ;; fix #462: when refiling from org-capture, Emacs prompts to kill the
   ;; underlying, modified buffer. This fixes that.
-  (defun +org-capture*refile (orig-fn &rest args)
+  (defun +org-capture*refile (&rest _)
     (when org-capture-is-refiling
       (org-save-all-org-buffers)))
   (advice-add 'org-refile :after #'+org-capture*refile)
diff --git a/modules/lang/org/autoload/org-capture.el b/modules/lang/org/autoload/org-capture.el
index afcef7aa6..d3ec2e86a 100644
--- a/modules/lang/org/autoload/org-capture.el
+++ b/modules/lang/org/autoload/org-capture.el
@@ -1,6 +1,8 @@
 ;;; lang/org/autoload/org-capture.el -*- lexical-binding: t; -*-
 ;;;###if (featurep! +capture)
 
+(defvar org-capture-initial)
+
 ;; --- External frame ---------------------
 
 (defvar +org-capture-window-params
diff --git a/modules/ui/posframe/autoload.el b/modules/ui/posframe/autoload.el
index d163a3aea..74e8625c0 100644
--- a/modules/ui/posframe/autoload.el
+++ b/modules/ui/posframe/autoload.el
@@ -8,11 +8,10 @@
 ;;;###autoload
 (defun +posframe-poshandler-frame-center-near-bottom (info)
   "TODO"
-  (let* ((posframe (plist-get info :posframe))
-         (parent-frame (plist-get info :parent-frame)))
-    (let ((pos (posframe-poshandler-frame-center info)))
-      (cons (car pos)
-            (truncate (/ (frame-pixel-height parent-frame) 1.6))))))
+  (let ((parent-frame (plist-get info :parent-frame))
+        (pos (posframe-poshandler-frame-center info)))
+    (cons (car pos)
+          (truncate (/ (frame-pixel-height parent-frame) 1.6)))))
 
 ;;;###autoload
 (defun +posframe|delete-on-escape ()