From 6dc31b33384ca2ad8c64398c28b9ad17df62a773 Mon Sep 17 00:00:00 2001
From: Maciej Szlosarczyk <maciej@sosek.net>
Date: Tue, 30 Mar 2021 08:21:32 +0300
Subject: [PATCH] Update packages, set modeline font

---
 straight/versions/default.el | 42 ++++++++++++++++++------------------
 themes/themes.el             |  3 ++-
 2 files changed, 23 insertions(+), 22 deletions(-)

diff --git a/straight/versions/default.el b/straight/versions/default.el
index b77fc84..e433741 100644
--- a/straight/versions/default.el
+++ b/straight/versions/default.el
@@ -7,35 +7,35 @@
  ("bui.el" . "f3a137628e112a91910fd33c0cff0948fa58d470")
  ("caml-mode" . "38ebde12d3d529e6ef8078967997d32226e69e82")
  ("cfrs" . "7c42f2c82c7ae689f3ef291b066688c58ab96298")
- ("cider" . "32835ea157212c500756ab625ddba4844b029c14")
+ ("cider" . "569e8e2ddb77b3c1170b1592e3c63f3aad9b0b8e")
  ("clj-refactor.el" . "9f3e7357117e96135de051b78deabc0a327c7b06")
  ("clojure-mode" . "a14671e03c867c9d759ee9e59cdc5cecbf271245")
  ("column-enforce-mode" . "14a7622f2268890e33536ccd29510024d51ee96f")
- ("company-mode" . "88001d794d963049339883216b6606de0a1209ea")
+ ("company-mode" . "de80d17cd2e7e51826c72ef85d94d38a0fca0a76")
  ("counsel-projectile" . "06b03c1080d3ccc3fa9b9c41b1ccbcf13f058e4b")
- ("dap-mode" . "ae395aa991d55eaddb2d2b80cd469089b9d19bb7")
+ ("dap-mode" . "41b78d230ee2750f0ac1e9c54d2441c433a6013d")
  ("dash-at-point" . "4d795a23a8428c421d5107f1b005c9d8e0d1816c")
  ("dash.el" . "a17b6b5409825891423b3867cd7bea84852d6ddd")
  ("deft" . "c4af44827f4257e7619e63abfd22094a29a9ab52")
  ("diminish.el" . "6ec6ebc391371418efc6c98d70b013f34af5a2ee")
- ("dockerfile-mode" . "07dde72b0e356d772fb65b969bd6decfa166e4d7")
- ("dune" . "835ed1a57469f8952957625d5f1236c7eb3174da")
+ ("dockerfile-mode" . "3b1374563f62d71aec11ebd33d37109459e54571")
+ ("dune" . "55acb0c661c50196cac11ea92dc6b73057668247")
  ("edit-indirect" . "bdc8f542fe8430ba55f9a24a7910639d4c434422")
  ("el-get" . "84dd1837f9ac80a329ab0c2de6859777f445f8ff")
  ("elisp-refs" . "b3634a4567c655a1cda51b217629849cba0ac6a7")
  ("emacs-ansible" . "40af0d2bbb6c5bbcf7aa9269ac9a07e22622d263")
- ("emacs-dashboard" . "1327fc36a0ba3136c7ffd3f1a1dda27f196631e6")
- ("emacs-elixir" . "d8c29c7e2080e2613869ce87ce048f12a2e4fc0e")
+ ("emacs-dashboard" . "00f1dc84d3fbaf439d23645aa531eee59e28f688")
+ ("emacs-elixir" . "0212b06f079f4965b6032bbbe7f86876575770de")
  ("emacs-fsharp-mode" . "78898a1535878394d83643c383f4320e7b5fcefd")
  ("emacs-hcl-mode" . "e12b1df2ca28d2b06c471cd709c038a2dc0bcdbd")
- ("emacs-libvterm" . "98179e129544bdee7d78fc095098971eeb72428d")
+ ("emacs-libvterm" . "1bc4516f53955dcbf397cf999f38e67eec835d8c")
  ("emacs-planet-theme" . "b0a310ff36565fe22224c407cf59569986698a32")
  ("emacs-racer" . "1e63e98626737ea9b662d4a9b1ffd6842b1c648c")
- ("emacs-which-key" . "c0608e812a8d1bc7aefeacdfaeb56a7272eabf44")
- ("emacsmirror-mirror" . "ac57d5a4aae5a3a284bc90dc02fc8da6b36adc2a")
+ ("emacs-which-key" . "c632dbf27a77c1c73ce559041b3a78ec5f78b187")
+ ("emacsmirror-mirror" . "9f00df1a00d97bbcdb9a820e0941f9196a71ec3d")
  ("enhanced-ruby-mode" . "e960bf941d9fa9d92eabf7c03a8bbb51ba1ac453")
  ("epl" . "78ab7a85c08222cd15582a298a364774e3282ce6")
- ("exec-path-from-shell" . "d14d6d2966efe5a1409f84a6b9d998268f74761d")
+ ("exec-path-from-shell" . "bf4bdc8b8911e7a2c04e624b9a343164c3878282")
  ("f.el" . "c4dbf8c8e83df834f5d6f72cd5649b9d8a8812ec")
  ("flatui-theme.el" . "9c15db5526c15c8dba55023f5698372b19c2a780")
  ("flycheck" . "f8c679fff349850c80541a31de50009c3c15d4c9")
@@ -44,7 +44,7 @@
  ("gleam-mode" . "60c0102e9a905027eb88600fef7d60bd3fbdaab1")
  ("gnu-elpa-mirror" . "c9bc5582228c82db01617802b8729ca86a76bf79")
  ("groovy-emacs-modes" . "26da902d1158c0312628d57578109be54eca2415")
- ("haskell-mode" . "20f72ccc17c8233dbb7c94ebf52a2a59e7d97730")
+ ("haskell-mode" . "1baa12abfa2c81128e5b13d1351f2978a4a54b4f")
  ("helpful" . "7e4b1f0d5572a4e2b8ee7a9b084ef863d0315a73")
  ("ht.el" . "c4c1be487d6ecb353d07881526db05d7fc90ea87")
  ("hydra" . "2d553787aca1aceb3e6927e426200e9bb9f056f1")
@@ -54,19 +54,19 @@
  ("keyfreq" . "e5fe9d585ce882f1ba9afa5d894eaa82c79be4f4")
  ("let-alist" . "6708ec0b2e6dff80ff5b64698aa009d9070a2ed2")
  ("lsp-haskell" . "7efbef3d206989faa8b691a4230a3ed872542187")
- ("lsp-mode" . "73b127f4cf09a443e1353aa6c40b2379b59c1bd6")
+ ("lsp-mode" . "4a234270d6a9706a9aee9d6acd6d56c3e8537b84")
  ("lsp-treemacs" . "3bae4a91e05d55d5ca92da272ffcd497f370e9df")
- ("lsp-ui" . "2781f83832ce6ba0b7ffb16da8d57fe2b93702c4")
+ ("lsp-ui" . "1613a2de55eca6213761a9b2c3e400063c87b5d0")
  ("macrostep" . "424e3734a1ee526a1bd7b5c3cd1d3ef19d184267")
- ("magit" . "cb9bb20cfe8e3a50df8669a43611ebc9a516358a")
+ ("magit" . "abb61935c65bc02815a6397c0e5d867aebcf5e54")
  ("markdown-mode" . "051734091aba17a54af96b81beebdbfc84c26459")
- ("melpa" . "74f79dc5db5246a2f70e4d4ad76601be8b5c79d8")
+ ("melpa" . "380125490f47bd150218280c2e16c01be9054a60")
  ("merlin" . "cc17ed60630fb1831ad950fe62970b1c7a7f4c8b")
  ("mmm-mode" . "0d00cdf4d02cc166304f6967a20fa22e2eaf208b")
  ("multiple-cursors.el" . "7b13b03c995e13ad86e499d40ec49c4dc281f889")
  ("nginx-mode" . "a2bab83c2eb233d57d76b236e7c141c2ccc97005")
- ("otp" . "ae623c36178b9015b54e84a8fc817d2ed607ce7b")
- ("page-break-lines" . "69caea070379f3324c530e96e06625c3cd097cb9")
+ ("otp" . "acd6700700aba75107f5b2a6194ff49cd31d7c4f")
+ ("page-break-lines" . "3b8549cd414d4d7ee0168ab9917124133566d3db")
  ("paredit" . "8330a41e8188fe18d3fa805bb9aa529f015318e8")
  ("parseclj" . "eff941126859bc9e949eae5cd6c2592e731629f2")
  ("parseedn" . "90cfe3df51b96f85e346f336c0a0ee6bf7fee508")
@@ -77,7 +77,7 @@
  ("pos-tip" . "179cc126b363f72ca12fab1e0dc462ce0ee79742")
  ("posframe" . "fff21ccb706b576f4074883f9fa87d2bcc534096")
  ("projectile" . "1528ed4f082e7aaca19f22394eb4bed879645b7c")
- ("purescript-mode" . "8410baff69ba934b64d78340c7fd20aa1e67dbfb")
+ ("purescript-mode" . "0acd1af446424ba855153161fe07a20f67dc0a89")
  ("queue" . "130c2d656cd5d7376552272fab9e50a7c37d0c4a")
  ("rainbow-delimiters" . "f43d48a24602be3ec899345a3326ed0247b960c6")
  ("rainbow-mode" . "949166cc0146bc9fabf74ce70c1c4a097f4cffd4")
@@ -95,10 +95,10 @@
  ("spinner" . "e19f3cfc0646c0e23c10c22df219fcf427054621")
  ("ssass-mode" . "96f557887ad97a0066a60c54f92b7234b8407016")
  ("straight.el" . "e1390a933b6f5a15079d6dec91eac97a17aad10c")
- ("swiper" . "47b496544e238041bca5e3c9ca55848648344312")
+ ("swiper" . "bb7965aa645982c9a80bd9e772538a210b645942")
  ("terraform-mode" . "a9fa5bdaf58e9cae32ee44b7d0883f5600441b05")
  ("transient" . "cc16a5eaa73617a281b0bbf71b24432c38994e30")
- ("treemacs" . "33be5b672b0492a901acd95bb9801a68ae7bdc95")
+ ("treemacs" . "62ef710023c7d974380a8e0127591b66e8ebe65c")
  ("tuareg" . "37a673020152ae0dbcaa250118b155d84e448f68")
  ("undo-tree" . "e326c6135e62f5fe8536528d3acd5e798f847407")
  ("use-package" . "a7422fb8ab1baee19adb2717b5b47b9c3812a84c")
diff --git a/themes/themes.el b/themes/themes.el
index b51b418..b398b73 100644
--- a/themes/themes.el
+++ b/themes/themes.el
@@ -45,7 +45,8 @@
   "Set font to NAME and its SIZE to X pixels."
   (interactive "sNew font: \nnEnter size for font %s: ")
   (set-face-attribute 'default nil :font (format "%s %d" name size))
-  (set-face-attribute 'mode-line nil :font (format "%s %d" name size)))
+  ;; Set modeline font to be 1 pixel point smaller than the general font
+  (set-face-attribute 'mode-line nil :font (format "%s %d" name (- size 1))))
 
 (defun set-font-to-screen ()
   "Automatically set font size to suit the monitor."