Add some ensures to make use-package download non-existing packages

init.el

@@ -1,7 +1,7 @@
 (eval-when-compile
   (require 'use-package))
 
-(bind-key "M-o" 'other-window)
+
 
 (custom-set-faces
  '(default ((t (:inherit nil :height 100 :family "Terminus")))))
@@ -11,6 +11,7 @@
 (show-paren-mode t)
 (savehist-mode t)
 (save-place-mode 1)
+(global-set-key (kbd "M-o") 'other-window)
 ;; Thinkpad keyboards have PrtSc where right alt should be
 (global-set-key (kbd "<print>") 'execute-extended-command)
 ;; OpenBSD prefixes gnu coreutils programs with g
@@ -22,8 +23,8 @@
       insert-directory-program "gls")
 
 ;; (require 'package)		 
-;; (add-to-list 'package-archives
-;; 	     '("melpa" . "https://melpa.org/packages/"))
+(add-to-list 'package-archives
+ 	     '("melpa" . "https://melpa.org/packages/"))
 (add-to-list 'package-archives
 	     '("melpa-stable" . "https://stable.melpa.org/packages/"))
 (add-to-list 'package-archives
@@ -32,19 +33,23 @@
 (setq use-package-compute-statistics t)
 
 (use-package magit
+  :ensure t
   :bind ("C-x g" . magit-status))
 (use-package modus-themes
   :ensure t
   :init
-  (modus-themes-load-themes)
+  ;;(modus-themes-load-themes)
   :config
-  (modus-themes-load-vivendi)
+  ;;(modus-themes-load-vivendi)
+  (load-theme 'modus-vivendi)
   :bind
   ("<f5>" . modus-themes-toggle))
 (use-package vertico
+  :ensure t
   :config
   (vertico-mode))
 (use-package orderless
+  :ensure t
   :init
   (setq completion-styles '(orderless basic)
 	completion-category-defaults nil
@@ -59,14 +64,18 @@
   (setq org-journal-dir "~/journal"
 	org-journal-file-type 'monthly))
 (use-package corfu
+  :ensure t
   :init
   (global-corfu-mode))
 (use-package slime
+  :ensure t
   :init
   (setq inferior-lisp-program "sbcl")
   :defer t)
-(use-package project)
+(use-package project
+  :ensure t)
 (use-package consult
+  :ensure t
   :init
   (setq consult-grep-args "ggrep --null --line-buffered --color=never --ignore-case --line-number -I -r .")
   (setq xref-show-xrefs-function #'consult-xref
@@ -120,10 +129,14 @@
          ("M-r" . consult-history))                ;; orig. previous-matching-history-)
 )
 (use-package expand-region
+  :ensure t
   :bind ("C-=" . er/expand-region)
   :init
   (setq expand-region-fast-keys-enabled t))
 
+(use-package racket-mode
+  :ensure t)
+
 (add-hook 'text-mode-hook 'auto-fill-mode)
 (add-hook 'prog-mode-hook 'display-line-numbers-mode)
 (add-hook 'prog-mode-hook 'turn-on-smartparens-strict-mode)