From 56f3fafb990170ff58de750a0f8e058665d7c71f Mon Sep 17 00:00:00 2001
From: Colin Okay <colin@cicadas.surf>
Date: Thu, 8 Sep 2022 07:53:18 -0500
Subject: Modify: changed my-package-install to just fail silently for now

---
 init-el.org | 15 +++++++--------
 1 file changed, 7 insertions(+), 8 deletions(-)

diff --git a/init-el.org b/init-el.org
index 9b884c3..9d7d589 100644
--- a/init-el.org
+++ b/init-el.org
@@ -81,14 +81,13 @@ So, to use this file for the very first time you must
 
 (defun my-package-install (package  &optional archive dont-select)
   "archive is a string naming the archive. Will attempt" 
-  (unless (assoc package package-alist)
-    (let* ((pkg-descs
-            (assoc package package-archive-contents))
-           (desc
-            (if archive 
-                (find archive pkg-descs :test 'equalp :key 'package-desc-archive))))
-      (when desc 
-        (package-install desc dont-select)))))
+  (let* ((pkg-descs
+          (assoc package package-archive-contents))
+         (desc
+          (if archive 
+              (find archive pkg-descs :test 'equalp :key 'package-desc-archive))))
+    (when desc 
+      (package-install desc dont-select))))
 
 (require 'package)
 (add-to-list 'package-archives
-- 
cgit v1.2.3