Getting the configuration working on my iMac
Each computer seems to be so unique.
This commit is contained in:
Howard Abrams
parent
14e3d5e9d9
commit
129f834812
3 changed files with 104 additions and 74 deletions
41
README.org
41
README.org
|
|
@ -7,31 +7,32 @@ My Emacs configuration, that I'm cheekily calling /hamacs/ is a literate program
|
|||
|
||||
The other advantage to rolling yer own is that you are more likely to /use/ what you add, leading to less bloat, and a more fun experience.
|
||||
|
||||
Why yes, feel free to steal whatever you find interesting, as sharing is what makes our community great. Notice that functions and features that I have written begin with =ha-=, however, everything else is either /stock Emacs/ or a /package/ that I download using [[https://github.com/raxod502/straight.el][straight]] (see [[file:bootstrap.org][bootstrap]] for how) and configured with [[https://github.com/jwiegley/use-package][use-package]] (see either [[https://ianyepan.github.io/posts/setting-up-use-package/][this introduction]] or [[https://www.emacswiki.org/emacs/UsePackage][this wiki page]] for details)... meaning that most blocks of code should /just work/ on its own.
|
||||
Why yes, feel free to steal whatever you find interesting, as sharing is what makes our community great. Notice that functions and features that I have written begin with ~ha-~, however, everything else is either /stock Emacs/ or a /package/ that I download using [[https://github.com/raxod502/straight.el][straight]] (see [[file:bootstrap.org][bootstrap]] for how) and configured with [[https://github.com/jwiegley/use-package][use-package]] (see either [[https://ianyepan.github.io/posts/setting-up-use-package/][this introduction]] or [[https://www.emacswiki.org/emacs/UsePackage][this wiki page]] for details)... meaning that most blocks of code should /just work/ on its own.
|
||||
Hit me up with questions, =@howardabrams=. If you want to try this out, after installing Emacs, and cloning this repo, run:
|
||||
#+BEGIN_SRC sh
|
||||
./initialize
|
||||
#+END_SRC
|
||||
This creates [[file:~/.emacs.d/init.el][~/.emacs.d/init.el]] that starts the process loading the files:
|
||||
|
||||
- [[file:bootstrap.org][bootstrap.org]] :: configures =straight= and loads basic libraries the rest of the code depends on. It then loads the following files in order:
|
||||
- [[file:ha-config.org][ha-config.org]] :: contains /most/ of my configuration, setting up my sequence key menus, evil, etc.
|
||||
- [[file:ha-display.org][ha-display.org]] :: sets up the visual aspects of an Emacs GUI, including themes, fonts and the dashboard.
|
||||
- [[file:ha-org.org][ha-org.org]] :: configures the basics for org-mode formatted files. Specific features, however, come from their own files, however.
|
||||
- [[file:ha-org-word-processor.org][ha-org-word-processor.org]] :: attempts to make Org files /visually/ look like what one might see in a word processor, including turning off the colors for headers, and instead increasing their size.
|
||||
- [[file:ha-org-clipboard.org][ha-org-clipboard.org]] :: automatically converting HTML from a clipboard into Org-formatted content.
|
||||
- [[file:ha-org-journaling.org][ha-org-journaling.org]] :: for writing journal entries and tasks.
|
||||
- [[file:ha-org-publishing.org][ha-org-publishing.org]] :: code for publishing my website, [[http://howardism.org][www.howardism.org]].
|
||||
- [[file:ha-org-sprint.org][ha-org-sprint.org]] :: functions for working with the my Org-focused sprint files.
|
||||
- [[file:ha-remoting.org][ha-remoting.org]] :: my interface to systems using SSH and Vterm.
|
||||
- [[file:ha-email.org][ha-email.org]] :: reading email using =notmuch= in a *Hey* fashion.
|
||||
- [[file:ha-feed-reader.org][ha-feed-reader.org]] :: configuration of elfeed as well as my RSS feeds.
|
||||
- [[file:ha-aux-apps.org][ha-aux-apps.org]] :: optional applications, like Twitter and Telegram.
|
||||
- [[file:ha-capturing-notes.org][ha-capturing-notes.org]] :: my engineering notebook.
|
||||
- [[file:ha-agendas.org][ha-agendas.org]] :: attempts to "supe-up" my task list.
|
||||
- [[file:ha-irc.org][ha-irc.org]] :: connection to IRC servers using rcirc and bitlbee.
|
||||
- [[file:ha-passwords.org][ha-passwords.org]] :: code for generating passwords.
|
||||
- [[file:ha-programming.org][ha-programming.org]] :: configuration for /all/ programming languages, or at least, the simple ones.
|
||||
- [[file:ha-programming-python.org][ha-programming-python.org]] :: configuration for working with Python and LSP.
|
||||
- [[file:bootstrap.org][bootstrap]] :: configures =straight= and loads basic libraries the rest of the code depends on. It then loads the following files in order:
|
||||
- [[file:ha-config.org][config]] :: contains /most/ of my configuration, setting up my sequence key menus, evil, etc.
|
||||
- [[file:ha-display.org][display]] :: sets up the visual aspects of an Emacs GUI, including themes, fonts and the dashboard.
|
||||
- [[file:ha-org.org][org]] :: configures the basics for org-mode formatted files. Specific features, however, come from their own files, however.
|
||||
- [[file:ha-org-word-processor.org][org-word-processor]] :: attempts to make Org files /visually/ look like what one might see in a word processor, including turning off the colors for headers, and instead increasing their size.
|
||||
- [[file:ha-org-clipboard.org][org-clipboard]] :: automatically converting HTML from a clipboard into Org-formatted content.
|
||||
- [[file:ha-org-journaling.org][org-journaling]] :: for writing journal entries and tasks.
|
||||
- [[file:ha-org-publishing.org][org-publishing]] :: code for publishing my website, [[http://howardism.org][www.howardism.org]].
|
||||
- [[file:ha-org-sprint.org][org-sprint]] :: functions for working with the my Org-focused sprint files.
|
||||
- [[file:ha-remoting.org][remoting]] :: my interface to systems using SSH and Vterm.
|
||||
- [[file:ha-email.org][email]] :: reading email using =notmuch= in a *Hey* fashion.
|
||||
- [[file:ha-feed-reader.org][feed-reader]] :: configuration of elfeed as well as my RSS feeds.
|
||||
- [[file:ha-aux-apps.org][aux-apps]] :: optional applications, like Twitter and Telegram.
|
||||
- [[file:ha-capturing-notes.org][capturing-notes]] :: my engineering notebook.
|
||||
- [[file:ha-agendas.org][agendas]] :: attempts to "supe-up" my task list.
|
||||
- [[file:ha-irc.org][irc]] :: connection to IRC servers using rcirc and bitlbee.
|
||||
- [[file:ha-passwords.org][passwords]] :: code for generating passwords.
|
||||
- [[file:ha-programming.org][programming]] :: configuration for /all/ programming languages, or at least, the simple ones.
|
||||
- [[file:ha-programming-python.org][programming-python]] :: configuration for working with Python and LSP.
|
||||
- [[file:ha-aux-apps.org][aux-apps]] :: additional application configuration.
|
||||
|
||||
*Note:* Other functions and files come from essays written on [[http://www.howardism.org][my blog]]. To help with this, see [[file:support/final-initialize.el][support/final-initialize.el]] file.
|
||||
|
|
|
|||
|
|
@ -75,21 +75,23 @@ With the way I start Emacs, I may not have the PATH I /actually/ use (from the s
|
|||
This is particularly useful under Mac OS X and macOS, where GUI
|
||||
apps are not started from a shell."
|
||||
(interactive)
|
||||
(let ((path-from-shell (replace-regexp-in-string
|
||||
(rx (zero-or-more space) eol)
|
||||
""
|
||||
(shell-command-to-string "$SHELL --login -c 'echo $PATH'"))))
|
||||
(setenv "PATH" path-from-shell)
|
||||
(setq exec-path (split-string path-from-shell path-separator))))
|
||||
|
||||
(when (ha-running-on-macos?)
|
||||
(set-exec-path-from-shell))
|
||||
(let* ((path-from-shell (shell-command-to-string "echo $PATH"))
|
||||
(trimmed-path (replace-regexp-in-string (rx (zero-or-more space) eol)
|
||||
"" path-from-shell))
|
||||
(in-fish? (string-match (rx "fish" eol)
|
||||
(shell-command-to-string "echo $SHELL")))
|
||||
(separator (if in-fish? " " ":"))
|
||||
(env-path (if in-fish? (replace-regexp-in-string " " ":" trimmed-path) trimmed-path)))
|
||||
(message "PATH=%s" path-from-shell)
|
||||
(setenv "PATH" env-path)
|
||||
(setq exec-path (split-string trimmed-path separator))))
|
||||
#+END_SRC
|
||||
|
||||
Clear up a Mac-specific issue that sometimes arises since I'm switching to [[http://akrl.sdf.org/gccemacs.html][native compilation project]], as the =Emacs.app= that I use doesn't have its =bin= directory, e.g. =Emacs.app/Contents/MacOS/bin=:
|
||||
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(when (ha-running-on-macos?)
|
||||
(add-to-list 'exec-path "/usr/local/bin")
|
||||
(add-to-list 'exec-path (concat invocation-directory "bin") t))
|
||||
#+END_SRC
|
||||
|
||||
|
|
@ -100,6 +102,25 @@ Getting tired off all the packages that I load spewing a bunch of warnings that
|
|||
(setq native-comp-async-report-warnings-errors nil
|
||||
native-comp-deferred-compilation t))
|
||||
#+END_SRC
|
||||
** GNU Pretty Good Privacy
|
||||
On Linux, GPG is pretty straight-forward, but on the Mac, I often have troubles doing:
|
||||
#+BEGIN_SRC sh
|
||||
brew install gpg
|
||||
#+END_SRC
|
||||
And I need to install the [[https://gpgtools.org/][GPG Suite]]. While very nice, isn't a GUI I really need, but can take advantage when installed:
|
||||
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(defun executable (path)
|
||||
"Return PATH if it is executable, see `file-executable-p'."
|
||||
(when (file-executable-p path) path))
|
||||
|
||||
(use-package epa-file
|
||||
:straight (:type built-in)
|
||||
:custom (epg-gpg-program (or (executable "/usr/local/MacGPG2/bin/gpg")
|
||||
(executable "/usr/local/bin/gpg")
|
||||
(executable "/usr/local/opt/gpg")))
|
||||
:config (epa-file-enable))
|
||||
#+END_SRC
|
||||
** Basic Libraries
|
||||
The following packages come with Emacs, but seems like they still need loading:
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
|
|
@ -138,17 +159,20 @@ Sure the Emacs application will almost always have the =server-start= going, how
|
|||
"Return non-nil when the Emacs application's location matches as one for work.
|
||||
Currently, this is the `emacs-plus' app that I have built with
|
||||
the native-comp model, but I reserve the right to change this."
|
||||
(and (f-dir? "~/work")
|
||||
(->> Info-default-directory-list
|
||||
(first)
|
||||
(s-split "/")
|
||||
(--filter (s-starts-with? "emacs-plus" it))
|
||||
(first)))
|
||||
(first))))
|
||||
#+END_SRC
|
||||
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(if (ha-emacs-for-work?)
|
||||
(if (not (ha-emacs-for-work?))
|
||||
(setq server-name "personal")
|
||||
(setq server-name "work")
|
||||
(setq server-name "personal"))
|
||||
(when (ha-running-on-macos?)
|
||||
(set-exec-path-from-shell)))
|
||||
|
||||
(server-start)
|
||||
#+END_SRC
|
||||
|
|
|
|||
|
|
@ -161,7 +161,8 @@ My /current/ favorite font is actually the top list of fonts that may be install
|
|||
#+BEGIN_SRC emacs-lisp
|
||||
(defvar ha-fixed-font
|
||||
(when window-system
|
||||
(cond ((x-list-fonts "Hack Nerd Font") "Hack Nerd Font")
|
||||
(cond
|
||||
((x-list-fonts "Hack Nerd Font") "Hack Nerd Font")
|
||||
((x-list-fonts "Cousine Nerd Font") "Cousine Nerd Font")
|
||||
((x-list-fonts "Iosevka Nerd Font") "Iosevka Nerd Font")
|
||||
((x-list-fonts "Iosevka") "Iosevka")
|
||||
|
|
@ -193,9 +194,7 @@ I probably don't need to have such a ranking system, as chances are really good
|
|||
"My variable width font available to org-mode files and whatnot.")
|
||||
#+END_SRC
|
||||
|
||||
Simple function that gives me the font information based on the size I
|
||||
need. This calls =set-frame-font=, but also sets the monospaced font
|
||||
for org code blocks.
|
||||
Simple function that gives me the font information based on the size I need. This calls =set-frame-font=, but also sets the monospaced font for org code blocks.
|
||||
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(defun ha-set-favorite-font-size (size)
|
||||
|
|
@ -232,6 +231,11 @@ for org code blocks.
|
|||
"Quickly set reset my font size when I disconnect my laptop to a monitor from Linux."
|
||||
(interactive)
|
||||
(ha-set-favorite-font-size 14))
|
||||
|
||||
(defun ha-imac-fontsize ()
|
||||
"Quickly set reset my font size when I am on my iMac."
|
||||
(interactive)
|
||||
(ha-set-favorite-font-size 16))
|
||||
#+END_SRC
|
||||
|
||||
Which font to choose?
|
||||
|
|
@ -240,9 +244,10 @@ Which font to choose?
|
|||
(defun font-monitor-size-default ()
|
||||
"Set the default size according to my preference."
|
||||
(interactive)
|
||||
(if (eq system-type 'gnu/linux)
|
||||
(ha-linux-monitor-fontsize)
|
||||
(ha-mac-monitor-fontsize)))
|
||||
(cond
|
||||
((eq system-type 'gnu/linux) (ha-linux-monitor-fontsize))
|
||||
((s-starts-with? "imac" system-name) (ha-imac-fontsize))
|
||||
(t (ha-mac-monitor-fontsize))))
|
||||
|
||||
(defun font-laptop-size-default ()
|
||||
"Set the default size according to my preference."
|
||||
|
|
|
|||
Loading…
Reference in a new issue