You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 

1004 lines
45 KiB

;; -*- mode: emacs-lisp; lexical-binding: t -*-
;; This file is loaded by Spacemacs at startup.
;; It must be stored in your home directory.
(defun dotspacemacs/layers ()
"Layer configuration:
This function should only modify configuration layer settings."
(setq-default
;; Base distribution to use. This is a layer contained in the directory
;; `+distribution'. For now available distributions are `spacemacs-base'
;; or `spacemacs'. (default 'spacemacs)
dotspacemacs-distribution 'spacemacs
;; Lazy installation of layers (i.e. layers are installed only when a file
;; with a supported type is opened). Possible values are `all', `unused'
;; and `nil'. `unused' will lazy install only unused layers (i.e. layers
;; not listed in variable `dotspacemacs-configuration-layers'), `all' will
;; lazy install any layer that support lazy installation even the layers
;; listed in `dotspacemacs-configuration-layers'. `nil' disable the lazy
;; installation feature and you have to explicitly list a layer in the
;; variable `dotspacemacs-configuration-layers' to install it.
;; (default 'unused)
dotspacemacs-enable-lazy-installation 'unused
;; If non-nil then Spacemacs will ask for confirmation before installing
;; a layer lazily. (default t)
dotspacemacs-ask-for-lazy-installation t
;; List of additional paths where to look for configuration layers.
;; Paths must have a trailing slash (i.e. "~/.mycontribs/")
dotspacemacs-configuration-layer-path '()
;; List of configuration layers to load.
dotspacemacs-configuration-layers
'(swift
yaml
themes-megapack
nginx
toml
html
python
javascript
pandoc
;; ----------------------------------------------------------------
;; Example of useful layers you may want to use right away.
;; Uncomment some layer names and press `SPC f e R' (Vim style) or
;; `M-m f e R' (Emacs style) to install them.
;; ----------------------------------------------------------------
auto-completion
(auto-completion :variables
auto-completion-enable-snippets-in-popup t
auto-completion-enable-help-tooltip t
auto-completion-use-company-box t
auto-completion-enable-sort-by-usage t)
;; better-defaults
emacs-lisp
git
helm
lsp
markdown
multiple-cursors
org
(org :variables
org-enable-bootstrap-support t
org-enable-jira-support t
;; org-enable-roam-support t
;; org-enable-roam-ui t
;; org-roam-completion-everywhere t
;; this does not work weel with my current font
;; org-enable-modern-support t
)
;; (shell :variables
;; shell-default-height 30
;; shell-default-position 'bottom)
;; spell-checking
syntax-checking
;; version-control
treemacs
docker
terraform
)
;; List of additional packages that will be installed without being wrapped
;; in a layer (generally the packages are installed only and should still be
;; loaded using load/require/use-package in the user-config section below in
;; this file). If you need some configuration for these packages, then
;; consider creating a layer. You can also put the configuration in
;; `dotspacemacs/user-config'. To use a local version of a package, use the
;; `:location' property: '(your-package :location "~/path/to/your-package/")
;; Also include the dependencies as they will not be resolved automatically.
;; as ofr Oct2024, MS Outlook does not support getting selected message via AppleScript
;; more here: https://forum.keyboardmaestro.com/t/new-outlook-applescript/31296
dotspacemacs-additional-packages '(
org-mac-link
org-alert
;org-caldav
;org-protocol
)
;; A list of packages that cannot be updated.
dotspacemacs-frozen-packages '()
;; A list of packages that will not be installed and loaded.
dotspacemacs-excluded-packages '()
;; Defines the behaviour of Spacemacs when installing packages.
;; Possible values are `used-only', `used-but-keep-unused' and `all'.
;; `used-only' installs only explicitly used packages and deletes any unused
;; packages as well as their unused dependencies. `used-but-keep-unused'
;; installs only the used packages but won't delete unused ones. `all'
;; installs *all* packages supported by Spacemacs and never uninstalls them.
;; (default is `used-only')
dotspacemacs-install-packages 'used-only))
(defun dotspacemacs/init ()
"Initialization:
This function is called at the very beginning of Spacemacs startup,
before layer configuration.
It should only modify the values of Spacemacs settings."
;; This setq-default sexp is an exhaustive list of all the supported
;; spacemacs settings.
(setq-default
;; If non-nil then enable support for the portable dumper. You'll need to
;; compile Emacs 27 from source following the instructions in file
;; EXPERIMENTAL.org at to root of the git repository.
;;
;; WARNING: pdumper does not work with Native Compilation, so it's disabled
;; regardless of the following setting when native compilation is in effect.
;;
;; (default nil)
dotspacemacs-enable-emacs-pdumper nil
;; Name of executable file pointing to emacs 27+. This executable must be
;; in your PATH.
;; (default "emacs")
dotspacemacs-emacs-pdumper-executable-file "emacs"
;; Name of the Spacemacs dump file. This is the file will be created by the
;; portable dumper in the cache directory under dumps sub-directory.
;; To load it when starting Emacs add the parameter `--dump-file'
;; when invoking Emacs 27.1 executable on the command line, for instance:
;; ./emacs --dump-file=$HOME/.emacs.d/.cache/dumps/spacemacs-27.1.pdmp
;; (default (format "spacemacs-%s.pdmp" emacs-version))
dotspacemacs-emacs-dumper-dump-file (format "spacemacs-%s.pdmp" emacs-version)
;; Maximum allowed time in seconds to contact an ELPA repository.
;; (default 5)
dotspacemacs-elpa-timeout 5
;; Set `gc-cons-threshold' and `gc-cons-percentage' when startup finishes.
;; This is an advanced option and should not be changed unless you suspect
;; performance issues due to garbage collection operations.
;; (default '(100000000 0.1))
dotspacemacs-gc-cons '(100000000 0.1)
;; Set `read-process-output-max' when startup finishes.
;; This defines how much data is read from a foreign process.
;; Setting this >= 1 MB should increase performance for lsp servers
;; in emacs 27.
;; (default (* 1024 1024))
dotspacemacs-read-process-output-max (* 1024 1024)
;; If non-nil then Spacelpa repository is the primary source to install
;; a locked version of packages. If nil then Spacemacs will install the
;; latest version of packages from MELPA. Spacelpa is currently in
;; experimental state please use only for testing purposes.
;; (default nil)
dotspacemacs-use-spacelpa nil
;; If non-nil then verify the signature for downloaded Spacelpa archives.
;; (default t)
dotspacemacs-verify-spacelpa-archives t
;; If non-nil then spacemacs will check for updates at startup
;; when the current branch is not `develop'. Note that checking for
;; new versions works via git commands, thus it calls GitHub services
;; whenever you start Emacs. (default nil)
dotspacemacs-check-for-update nil
;; If non-nil, a form that evaluates to a package directory. For example, to
;; use different package directories for different Emacs versions, set this
;; to `emacs-version'. (default 'emacs-version)
dotspacemacs-elpa-subdirectory 'emacs-version
;; One of `vim', `emacs' or `hybrid'.
;; `hybrid' is like `vim' except that `insert state' is replaced by the
;; `hybrid state' with `emacs' key bindings. The value can also be a list
;; with `:variables' keyword (similar to layers). Check the editing styles
;; section of the documentation for details on available variables.
;; (default 'vim)
dotspacemacs-editing-style 'vim
;; If non-nil show the version string in the Spacemacs buffer. It will
;; appear as (spacemacs version)@(emacs version)
;; (default t)
dotspacemacs-startup-buffer-show-version t
;; Specify the startup banner. Default value is `official', it displays
;; the official spacemacs logo. An integer value is the index of text
;; banner, `random' chooses a random text banner in `core/banners'
;; directory. A string value must be a path to an image format supported
;; by your Emacs build.
;; If the value is nil then no banner is displayed. (default 'official)
dotspacemacs-startup-banner 'official
;; Scale factor controls the scaling (size) of the startup banner. Default
;; value is `auto' for scaling the logo automatically to fit all buffer
;; contents, to a maximum of the full image height and a minimum of 3 line
;; heights. If set to a number (int or float) it is used as a constant
;; scaling factor for the default logo size.
dotspacemacs-startup-banner-scale 'auto
;; List of items to show in startup buffer or an association list of
;; the form `(list-type . list-size)`. If nil then it is disabled.
;; Possible values for list-type are:
;; `recents' `recents-by-project' `bookmarks' `projects' `agenda' `todos'.
;; List sizes may be nil, in which case
;; `spacemacs-buffer-startup-lists-length' takes effect.
;; The exceptional case is `recents-by-project', where list-type must be a
;; pair of numbers, e.g. `(recents-by-project . (7 . 5))', where the first
;; number is the project limit and the second the limit on the recent files
;; within a project.
dotspacemacs-startup-lists '((recents . 5)
(projects . 7))
;; True if the home buffer should respond to resize events. (default t)
dotspacemacs-startup-buffer-responsive t
;; Show numbers before the startup list lines. (default t)
dotspacemacs-show-startup-list-numbers t
;; The minimum delay in seconds between number key presses. (default 0.4)
dotspacemacs-startup-buffer-multi-digit-delay 0.4
;; If non-nil, show file icons for entries and headings on Spacemacs home buffer.
;; This has no effect in terminal or if "all-the-icons" package or the font
;; is not installed. (default nil)
dotspacemacs-startup-buffer-show-icons nil
;; Default major mode for a new empty buffer. Possible values are mode
;; names such as `text-mode'; and `nil' to use Fundamental mode.
;; (default `text-mode')
dotspacemacs-new-empty-buffer-major-mode 'text-mode
;; Default major mode of the scratch buffer (default `text-mode')
dotspacemacs-scratch-mode 'text-mode
;; If non-nil, *scratch* buffer will be persistent. Things you write down in
;; *scratch* buffer will be saved and restored automatically.
dotspacemacs-scratch-buffer-persistent nil
;; If non-nil, `kill-buffer' on *scratch* buffer
;; will bury it instead of killing.
dotspacemacs-scratch-buffer-unkillable nil
;; Initial message in the scratch buffer, such as "Welcome to Spacemacs!"
;; (default nil)
dotspacemacs-initial-scratch-message nil
;; List of themes, the first of the list is loaded when spacemacs starts.
;; Press `SPC T n' to cycle to the next theme in the list (works great
;; with 2 themes variants, one dark and one light)
dotspacemacs-themes '(spacemacs-dark
spacemacs-light)
;; Set the theme for the Spaceline. Supported themes are `spacemacs',
;; `all-the-icons', `custom', `doom', `vim-powerline' and `vanilla'. The
;; first three are spaceline themes. `doom' is the doom-emacs mode-line.
;; `vanilla' is default Emacs mode-line. `custom' is a user defined themes,
;; refer to the DOCUMENTATION.org for more info on how to create your own
;; spaceline theme. Value can be a symbol or list with additional properties.
;; (default '(spacemacs :separator wave :separator-scale 1.5))
dotspacemacs-mode-line-theme '(spacemacs :separator wave :separator-scale 1.5)
;; If non-nil the cursor color matches the state color in GUI Emacs.
;; (default t)
dotspacemacs-colorize-cursor-according-to-state t
;; Default font or prioritized list of fonts. This setting has no effect when
;; running Emacs in terminal. The font set here will be used for default and
;; fixed-pitch faces. The `:size' can be specified as
;; a non-negative integer (pixel size), or a floating-point (point size).
;; Point size is recommended, because it's device independent. (default 10.0)
;; commented out on 30.7.2025 - seems not to have effect
;; dotspacemacs-default-font '("Source Code Pro for Powerline"
;; :height 180
;; :weight normal
;; :width normal)
;; The leader key (default "SPC")
dotspacemacs-leader-key "SPC"
;; The key used for Emacs commands `M-x' (after pressing on the leader key).
;; (default "SPC")
dotspacemacs-emacs-command-key "SPC"
;; The key used for Vim Ex commands (default ":")
dotspacemacs-ex-command-key ":"
;; The leader key accessible in `emacs state' and `insert state'
;; (default "M-m")
dotspacemacs-emacs-leader-key "M-m"
;; Major mode leader key is a shortcut key which is the equivalent of
;; pressing `<leader> m`. Set it to `nil` to disable it. (default ",")
dotspacemacs-major-mode-leader-key ","
;; Major mode leader key accessible in `emacs state' and `insert state'.
;; (default "C-M-m" for terminal mode, "<M-return>" for GUI mode).
;; Thus M-RET should work as leader key in both GUI and terminal modes.
;; C-M-m also should work in terminal mode, but not in GUI mode.
dotspacemacs-major-mode-emacs-leader-key (if window-system "<M-return>" "C-M-m")
;; These variables control whether separate commands are bound in the GUI to
;; the key pairs `C-i', `TAB' and `C-m', `RET'.
;; Setting it to a non-nil value, allows for separate commands under `C-i'
;; and TAB or `C-m' and `RET'.
;; In the terminal, these pairs are generally indistinguishable, so this only
;; works in the GUI. (default nil)
dotspacemacs-distinguish-gui-tab nil
;; Name of the default layout (default "Default")
dotspacemacs-default-layout-name "Default"
;; If non-nil the default layout name is displayed in the mode-line.
;; (default nil)
dotspacemacs-display-default-layout nil
;; If non-nil then the last auto saved layouts are resumed automatically upon
;; start. (default nil)
dotspacemacs-auto-resume-layouts t
;; If non-nil, auto-generate layout name when creating new layouts. Only has
;; effect when using the "jump to layout by number" commands. (default nil)
dotspacemacs-auto-generate-layout-names nil
;; Size (in MB) above which spacemacs will prompt to open the large file
;; literally to avoid performance issues. Opening a file literally means that
;; no major mode or minor modes are active. (default is 1)
dotspacemacs-large-file-size 1
;; Location where to auto-save files. Possible values are `original' to
;; auto-save the file in-place, `cache' to auto-save the file to another
;; file stored in the cache directory and `nil' to disable auto-saving.
;; (default 'cache)
dotspacemacs-auto-save-file-location 'cache
;; Maximum number of rollback slots to keep in the cache. (default 5)
dotspacemacs-max-rollback-slots 5
;; If non-nil, the paste transient-state is enabled. While enabled, after you
;; paste something, pressing `C-j' and `C-k' several times cycles through the
;; elements in the `kill-ring'. (default nil)
dotspacemacs-enable-paste-transient-state nil
;; Which-key delay in seconds. The which-key buffer is the popup listing
;; the commands bound to the current keystroke sequence. (default 0.4)
dotspacemacs-which-key-delay 0.4
;; Which-key frame position. Possible values are `right', `bottom' and
;; `right-then-bottom'. right-then-bottom tries to display the frame to the
;; right; if there is insufficient space it displays it at the bottom.
;; It is also possible to use a posframe with the following cons cell
;; `(posframe . position)' where position can be one of `center',
;; `top-center', `bottom-center', `top-left-corner', `top-right-corner',
;; `top-right-corner', `bottom-left-corner' or `bottom-right-corner'
;; (default 'bottom)
dotspacemacs-which-key-position 'bottom
;; Control where `switch-to-buffer' displays the buffer. If nil,
;; `switch-to-buffer' displays the buffer in the current window even if
;; another same-purpose window is available. If non-nil, `switch-to-buffer'
;; displays the buffer in a same-purpose window even if the buffer can be
;; displayed in the current window. (default nil)
dotspacemacs-switch-to-buffer-prefers-purpose nil
;; Whether side windows (such as those created by treemacs or neotree)
;; are kept or minimized by `spacemacs/toggle-maximize-window' (SPC w m).
;; (default t)
dotspacemacs-maximize-window-keep-side-windows t
;; If non-nil a progress bar is displayed when spacemacs is loading. This
;; may increase the boot time on some systems and emacs builds, set it to
;; nil to boost the loading time. (default t)
dotspacemacs-loading-progress-bar t
;; If non-nil the frame is fullscreen when Emacs starts up. (default nil)
;; (Emacs 24.4+ only)
dotspacemacs-fullscreen-at-startup nil
;; If non-nil `spacemacs/toggle-fullscreen' will not use native fullscreen.
;; Use to disable fullscreen animations in OSX. (default nil)
dotspacemacs-fullscreen-use-non-native nil
;; If non-nil the frame is maximized when Emacs starts up.
;; Takes effect only if `dotspacemacs-fullscreen-at-startup' is nil.
;; (default t) (Emacs 24.4+ only)
dotspacemacs-maximized-at-startup t
;; If non-nil the frame is undecorated when Emacs starts up. Combine this
;; variable with `dotspacemacs-maximized-at-startup' to obtain fullscreen
;; without external boxes. Also disables the internal border. (default nil)
dotspacemacs-undecorated-at-startup nil
;; A value from the range (0..100), in increasing opacity, which describes
;; the transparency level of a frame when it's active or selected.
;; Transparency can be toggled through `toggle-transparency'. (default 90)
dotspacemacs-active-transparency 90
;; A value from the range (0..100), in increasing opacity, which describes
;; the transparency level of a frame when it's inactive or deselected.
;; Transparency can be toggled through `toggle-transparency'. (default 90)
dotspacemacs-inactive-transparency 90
;; A value from the range (0..100), in increasing opacity, which describes the
;; transparency level of a frame background when it's active or selected. Transparency
;; can be toggled through `toggle-background-transparency'. (default 90)
dotspacemacs-background-transparency 90
;; If non-nil show the titles of transient states. (default t)
dotspacemacs-show-transient-state-title t
;; If non-nil show the color guide hint for transient state keys. (default t)
dotspacemacs-show-transient-state-color-guide t
;; If non-nil unicode symbols are displayed in the mode line.
;; If you use Emacs as a daemon and wants unicode characters only in GUI set
;; the value to quoted `display-graphic-p'. (default t)
dotspacemacs-mode-line-unicode-symbols t
;; If non-nil smooth scrolling (native-scrolling) is enabled. Smooth
;; scrolling overrides the default behavior of Emacs which recenters point
;; when it reaches the top or bottom of the screen. (default t)
dotspacemacs-smooth-scrolling t
;; Show the scroll bar while scrolling. The auto hide time can be configured
;; by setting this variable to a number. (default t)
dotspacemacs-scroll-bar-while-scrolling t
;; Control line numbers activation.
;; If set to `t', `relative' or `visual' then line numbers are enabled in all
;; `prog-mode' and `text-mode' derivatives. If set to `relative', line
;; numbers are relative. If set to `visual', line numbers are also relative,
;; but only visual lines are counted. For example, folded lines will not be
;; counted and wrapped lines are counted as multiple lines.
;; This variable can also be set to a property list for finer control:
;; '(:relative nil
;; :visual nil
;; :disabled-for-modes dired-mode
;; doc-view-mode
;; markdown-mode
;; org-mode
;; pdf-view-mode
;; text-mode
;; :size-limit-kb 1000)
;; When used in a plist, `visual' takes precedence over `relative'.
;; (default nil)
dotspacemacs-line-numbers nil
;; Code folding method. Possible values are `evil', `origami' and `vimish'.
;; (default 'evil)
dotspacemacs-folding-method 'evil
;; If non-nil and `dotspacemacs-activate-smartparens-mode' is also non-nil,
;; `smartparens-strict-mode' will be enabled in programming modes.
;; (default nil)
dotspacemacs-smartparens-strict-mode nil
;; If non-nil smartparens-mode will be enabled in programming modes.
;; (default t)
dotspacemacs-activate-smartparens-mode t
;; If non-nil pressing the closing parenthesis `)' key in insert mode passes
;; over any automatically added closing parenthesis, bracket, quote, etc...
;; This can be temporary disabled by pressing `C-q' before `)'. (default nil)
dotspacemacs-smart-closing-parenthesis nil
;; Select a scope to highlight delimiters. Possible values are `any',
;; `current', `all' or `nil'. Default is `all' (highlight any scope and
;; emphasis the current one). (default 'all)
dotspacemacs-highlight-delimiters 'all
;; If non-nil, start an Emacs server if one is not already running.
;; (default nil)
dotspacemacs-enable-server nil
;; Set the emacs server socket location.
;; If nil, uses whatever the Emacs default is, otherwise a directory path
;; like \"~/.emacs.d/server\". It has no effect if
;; `dotspacemacs-enable-server' is nil.
;; (default nil)
dotspacemacs-server-socket-dir nil
;; If non-nil, advise quit functions to keep server open when quitting.
;; (default nil)
dotspacemacs-persistent-server t
;; List of search tool executable names. Spacemacs uses the first installed
;; tool of the list. Supported tools are `rg', `ag', `pt', `ack' and `grep'.
;; (default '("rg" "ag" "pt" "ack" "grep"))
dotspacemacs-search-tools '("rg" "ag" "pt" "ack" "grep")
;; The backend used for undo/redo functionality. Possible values are
;; `undo-fu', `undo-redo' and `undo-tree' see also `evil-undo-system'.
;; Note that saved undo history does not get transferred when changing
;; your undo system. The default is currently `undo-fu' as `undo-tree'
;; is not maintained anymore and `undo-redo' is very basic."
dotspacemacs-undo-system 'undo-fu
;; Format specification for setting the frame title.
;; %a - the `abbreviated-file-name', or `buffer-name'
;; %t - `projectile-project-name'
;; %I - `invocation-name'
;; %S - `system-name'
;; %U - contents of $USER
;; %b - buffer name
;; %f - visited file name
;; %F - frame name
;; %s - process status
;; %p - percent of buffer above top of window, or Top, Bot or All
;; %P - percent of buffer above bottom of window, perhaps plus Top, or Bot or All
;; %m - mode name
;; %n - Narrow if appropriate
;; %z - mnemonics of buffer, terminal, and keyboard coding systems
;; %Z - like %z, but including the end-of-line format
;; If nil then Spacemacs uses default `frame-title-format' to avoid
;; performance issues, instead of calculating the frame title by
;; `spacemacs/title-prepare' all the time.
;; (default "%I@%S")
dotspacemacs-frame-title-format "%I@%S"
;; Format specification for setting the icon title format
;; (default nil - same as frame-title-format)
dotspacemacs-icon-title-format nil
;; Color highlight trailing whitespace in all prog-mode and text-mode derived
;; modes such as c++-mode, python-mode, emacs-lisp, html-mode, rst-mode etc.
;; (default t)
dotspacemacs-show-trailing-whitespace t
;; Delete whitespace while saving buffer. Possible values are `all'
;; to aggressively delete empty line and long sequences of whitespace,
;; `trailing' to delete only the whitespace at end of lines, `changed' to
;; delete only whitespace for changed lines or `nil' to disable cleanup.
;; The variable `global-spacemacs-whitespace-cleanup-modes' controls
;; which major modes have whitespace cleanup enabled or disabled
;; by default.
;; (default nil)
dotspacemacs-whitespace-cleanup nil
;; If non-nil activate `clean-aindent-mode' which tries to correct
;; virtual indentation of simple modes. This can interfere with mode specific
;; indent handling like has been reported for `go-mode'.
;; If it does deactivate it here.
;; (default t)
dotspacemacs-use-clean-aindent-mode t
;; Accept SPC as y for prompts if non-nil. (default nil)
dotspacemacs-use-SPC-as-y nil
;; If non-nil shift your number row to match the entered keyboard layout
;; (only in insert state). Currently supported keyboard layouts are:
;; `qwerty-us', `qwertz-de' and `querty-ca-fr'.
;; New layouts can be added in `spacemacs-editing' layer.
;; (default nil)
dotspacemacs-swap-number-row nil
;; Either nil or a number of seconds. If non-nil zone out after the specified
;; number of seconds. (default nil)
dotspacemacs-zone-out-when-idle nil
;; Run `spacemacs/prettify-org-buffer' when
;; visiting README.org files of Spacemacs.
;; (default nil)
dotspacemacs-pretty-docs nil
;; If nil the home buffer shows the full path of agenda items
;; and todos. If non-nil only the file name is shown.
dotspacemacs-home-shorten-agenda-source nil
;; If non-nil then byte-compile some of Spacemacs files.
dotspacemacs-byte-compile nil))
(defun dotspacemacs/user-env ()
"Environment variables setup.
This function defines the environment variables for your Emacs session. By
default it calls `spacemacs/load-spacemacs-env' which loads the environment
variables declared in `~/.spacemacs.env' or `~/.spacemacs.d/.spacemacs.env'.
See the header of this file for more information."
(spacemacs/load-spacemacs-env)
)
(defun dotspacemacs/user-init ()
"Initialization for user code:
This function is called immediately after `dotspacemacs/init', before layer
configuration.
It is mostly for variables that should be set before packages are loaded.
If you are unsure, try setting them in `dotspacemacs/user-config' first."
;; (add-to-list 'load-path "/Users/jetpac/Documents/emacs/tramp-mirror/tramp/lisp")
)
(defun dotspacemacs/user-load ()
"Library to load while dumping.
This function is called only while dumping Spacemacs configuration. You can
`require' or `load' the libraries of your choice that will be included in the
dump."
)
(defun dotspacemacs/user-config ()
"Configuration for user code:
This function is called at the very end of Spacemacs startup, after layer
configuration.
Put your configuration code here, except for variables that should be set
before packages are loaded."
;; setting gui font for gui only
(defun my/set-gui-font ()
(when (display-graphic-p)
(set-frame-font "MesloLGS Nerd Font-18" t t)))
;; (set-frame-font "Source Code Pro for Powerline-18" t t)))
(add-hook 'after-make-frame-functions
(lambda (frame)
(select-frame frame)
(my/set-gui-font)))
;; Also apply font immediately if current frame is GUI
(my/set-gui-font)
;; end of setting gui font
;; (require 'tramp)
;; for 24bit colors to work (and extra themes), use TERM=xterm-24bit
;; as described at https://github.com/syl20bnr/spacemacs/wiki/Terminal
;; for pandoc to work
(add-to-list 'exec-path "/opt/homebrew/bin")
(setenv "PATH" (concat "/opt/homebrew/bin:" (getenv "PATH")))
;; Proxy toggle function
(setq http_proxy "http://www-proxy.uk.oracle.com:80")
(defun toggle-proxy ()
"Toggle proxy settings for Emacs."
(interactive)
(if (and (boundp 'url-proxy-services) url-proxy-services)
(progn
(setq url-proxy-services nil)
(message "Proxy disabled"))
(setq url-proxy-services
`(("no_proxy" . "localhost")
("http" . ,http_proxy)
("https" . ,http_proxy)))
(message ( concat "Proxy enabled: " http_proxy)))
)
;; Bind proxy toggle function to a key
(spacemacs/set-leader-keys "ot" 'toggle-proxy)
;; idea from chatgpt
(defun set-dotfiles-environment ()
"Set environment variables for the dotfiles repository."
(interactive)
(setenv "GIT_DIR" (expand-file-name "~/.cfg/"))
(setenv "GIT_WORK_TREE" (expand-file-name "~"))
(message "Dotfiles environment set."))
(defun unset-dotfiles-environment ()
"Unset environment variables for the dotfiles repository."
(interactive)
(setenv "GIT_DIR" nil)
(setenv "GIT_WORK_TREE" nil)
(message "Dotfiles environment unset."))
(defun magit-status-dotfiles ()
"Open Magit with the dotfiles Git configuration."
(interactive)
(let ((default-directory (expand-file-name "~/")))
(set-dotfiles-environment)
(magit-status)
(unset-dotfiles-environment)))
(with-eval-after-load 'org
;; test from https://superuser.com/questions/452649/org-mode-to-markdown-converter
(require 'ox-md nil t)
(setq org-directory "~/Documents/org")
(setq org-default-notes-file "~/Documents/org/inbox.org")
(setq org-duration-format 'h:mm)
;; ================================================================================
;; config for org-caldav for my nextcloud installation
;; not working to my satisfaction yet - only configured for not used files
;; inspiration from https://www.reddit.com/r/orgmode/comments/8rl8ep/making_orgcaldav_useable/
;; doc: https://github.com/dengste/org-caldav
;; URL of the caldav server
(setq org-caldav-url "https://next.cloud.jetpac.org/remote.php/dav/calendars/jetpac")
(setq org-caldav-calendars
'((:calendar-id "personal"
:files ("~/Documents/org/synced_calendar.org")
;; :inbox ("~/Documents/org/caldav/from-calendar.org")
;; :sync-direction ('org->cal)
))
)
;; config
(setq org-icalendar-alarm-time 1)
;; This makes sure to-do items as a category can show up on the calendar
(setq org-icalendar-include-todo t)
;; This ensures all org "deadlines" show up, and show up as due dates
(setq org-icalendar-use-deadline '(event-if-todo event-if-not-todo todo-due))
;; This ensures "scheduled" org items show up, and show up as start times
(setq org-icalendar-use-scheduled '(todo-start event-if-todo event-if-not-todo))
(setq org-caldav-backup-file "~/Documents/org/caldav/org-caldav-backup.org")
(setq org-caldav-save-directory "~/Documents/org/caldav/")
;; ;; calendar ID on server
;; (setq org-caldav-calendar-id "personal")
;; ;; Org filename where new entries from calendar stored
(setq org-caldav-inbox "~/Documents/org/caldav/from-calendar.org")
;; ;; Additional Org files to check for calendar events
;; ;; this line breaks the sync!
;; (setq org-caldav-files ("~/Documents/org/caldav/todo.org"))
;; ;; (setq org-caldav-files nil)
;; ;; Usually a good idea to set the timezone manually
;; (setq org-icalendar-timezone "Europe/Prague")
;; ;; sync from org to cal only
;; (setq org-caldav-sync-direction "org->cal")
;; ;; (setq org-caldav-sync-direction "twoway")
;; ================================================================================
;; Define the custum capture templates
(setq org-capture-templates
'(("t" "Todo [inbox] clock_in clock_resume " entry (file+headline org-default-notes-file "Tasks")
"* TODO %?\n%u\n%a\n" :clock-in t :clock-resume t)
("m" "Meeting [diary] " entry (file+headline org-default-notes-file "Meetings")
"* MEETING %? :Meeting:\n%t" :clock-in t :clock-resume t)
("d" "Diary [diary] " entry (file+datetree "~/org/diary.org")
"* %?\n%U\n" :clock-in t :clock-resume t)
("i" "Inbox [inbox]" entry (file+headline org-default-notes-file "Capture")
"* %?\n Captured: %U\n%i\n %a" :empty-lines 1)
;; ("i" "Idea [inbox] " entry (file org-default-notes-file)
;; "* %? :IDEA: \n%t" :clock-in t :clock-resume t)
("n" "Next Task" entry (file+headline org-default-notes-file "Tasks")
"** NEXT %? \nDEADLINE: %t") ))
; original
; (setq org-agenda-files '("~/Documents/org/inbox.org"
; "~/Documents/org/projects.org"
; "~/Documents/org/someday.org"
; "~/Documents/org/calendar.org"))
; testing freeze
(setq org-agenda-files '("~/Documents/org/inbox.org"
"~/Documents/org/projects.org"
"~/Documents/org/someday.org"
"~/Documents/org/calendar.org"
"~/Documents/org/synced_calendar.org"
))
(setq org-refile-targets '(("/Users/jetpac/Documents/org/projects.org" :maxlevel . 3)
("/Users/jetpac/Documents/org/inbox.org" :maxlevel . 3)
("/Users/jetpac/Documents/org/someday.org" :maxlevel . 3)
("/Users/jetpac/Documents/org/inbox.org" :maxlevel . 3)
("/Users/jetpac/Documents/org/calendar.org" :maxlevel . 2)))
;; Don't include a footer with my contact and publishing information at the bottom of every exported HTML document.
(setq org-html-postamble nil)
;; inspiration from https://emacs.stackexchange.com/questions/33179/how-to-fix-columns-of-org-agenda-clock-report
(setq org-agenda-clockreport-parameter-plist
(quote (:link t :maxlevel 7 :fileskip0 t :compact t :narrow 80 :formula %)))
(setq org-agenda-custom-commands
'(
("g" "Get Things Done (GTD)"
((agenda ""
(
;; (org-agenda-skip-function
;; '(org-agenda-skip-entry-if 'deadline))
(org-deadline-warning-days 0)
(org-agenda-time-grid)
)
)
(todo "NEXT"
(
;; (org-agenda-skip-function
;; '(org-agenda-skip-entry-if 'deadline))
(org-agenda-prefix-format " %i %-12:c [%-4e] ")
(org-agenda-overriding-header "Tasks\n")))
(agenda "dead"
((org-agenda-entry-types '(:deadline))
;;(org-agenda-format-date "")
(org-deadline-warning-days 7)
(org-agenda-skip-function
'(org-agenda-skip-entry-if 'notregexp "\\* NEXT"))
(org-agenda-overriding-header "Deadlines\n")))
(tags-todo "inbox"
((org-agenda-prefix-format " %?-12t% s")
(org-agenda-overriding-header "Inbox\n")))
(tags "CLOSED>=\"<today>\""
((org-agenda-overriding-header "Completed today\n")))))
)
)
(setq org-todo-keywords
'((sequence "TODO(t)" "NEXT(n)" "WAIT(w)" "RUNNING(r)" "|" "DONE(d)" "CANCELLED(c)" )))
(setq org-clock-out-remove-zero-time-clocks t)
) ;; with-eval-after-load
(with-eval-after-load 'markdown-mode
(define-key markdown-mode-map (kbd "C-c x") 'my/markdown-toggle-checkbox))
(setq calendar-week-start-day 1) ;; calendar start on Monday
;; org-alert configuration
;; https://github.com/jwiegley/alert
;; https://www.youtube.com/watch?v=wKTKmE1wLyw
(use-package org-alert
:config
;; (setq alert-default-style 'notifier) ;; Use terminal-notifier for macOS notifications
(setq alert-default-style 'osx-notifier) ;; Use terminal-notifier for macOS notifications
(setq org-alert-notify-cutoff 10 ;; Notify 10 minutes before the deadline
org-alert-notification-title "Org Alert Reminder!"
)
(org-alert-enable))
(defun my/markdown-toggle-checkbox ()
"Toggle checkbox in markdown list at point."
(interactive)
(save-excursion
(beginning-of-line)
(when (looking-at "\\s-*[-*]\\s-+\\[\\([ xX]\\)\\]")
(replace-match
(if (string= (match-string 1) " ")
"x" " ") nil nil nil 1))))
(setq warning-minimum-level :error)
;; 28.4. - terminal clipboard integration
;; (when (and (not (display-graphic-p))
;; (eq system-type 'darwin))
;; (defun copy-to-mac-clipboard (text &optional push)
;; (let ((process-connection-type nil))
;; (let ((proc (start-process "pbcopy" "*Messages*" "pbcopy")))
;; (process-send-string proc text)
;; (process-send-eof proc))))
;; (defun paste-from-mac-clipboard ()
;; (shell-command-to-string "pbpaste"))
;; (setq interprogram-cut-function 'copy-to-mac-clipboard)
;; (setq interprogram-paste-function 'paste-from-mac-clipboard))
;; terminal clipboard that should also work on remote systems
(defun my/set-clipboard-integration ()
(cond
;; macOS in terminal (non-GUI mode) – use pbcopy/pbpaste
((and (eq system-type 'darwin)
(not (display-graphic-p)))
(defun copy-to-mac-clipboard (text &optional push)
(let ((process-connection-type nil))
(let ((proc (start-process "pbcopy" "*Messages*" "pbcopy")))
(process-send-string proc text)
(process-send-eof proc))))
(defun paste-from-mac-clipboard ()
(shell-command-to-string "pbpaste"))
(setq interprogram-cut-function 'copy-to-mac-clipboard)
(setq interprogram-paste-function 'paste-from-mac-clipboard))
;; All other non-GUI modes (e.g., tmux, remote SSH) – use OSC 52
((not (display-graphic-p))
(defun copy-to-osc52 (text &optional push)
(let ((osc52 (concat "\e]52;c;" (base64-encode-string text t) "\a")))
(send-string-to-terminal osc52)))
(setq interprogram-cut-function 'copy-to-osc52)
;; paste not supported with OSC 52, leave interprogram-paste-function nil
(message "Using OSC 52 for clipboard integration"))))
(my/set-clipboard-integration)
) ;; user-config
;; Do not write anything past this comment. This is where Emacs will
;; auto-generate custom variable definitions.
(defun dotspacemacs/emacs-custom-settings ()
"Emacs custom settings.
This is an auto-generated function, do not modify its content directly, use
Emacs customize menu instead.
This function is called at the very end of Spacemacs initialization."
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(custom-enabled-themes '(spacemacs-dark))
'(custom-safe-themes
'("7fea145741b3ca719ae45e6533ad1f49b2a43bf199d9afaee5b6135fd9e6f9b8"
"810691bd221e4639d5ef736b1bd930a7fb32a7c6043a5634e04f86edea973f6d"
"a0ac98a1bde5d6336295fd350155a4aac1d63c53c1b3773062271074d16ebeb5"
"bbb13492a15c3258f29c21d251da1e62f1abb8bbd492386a673dcfab474186af"
"7fd8b914e340283c189980cd1883dbdef67080ad1a3a9cc3df864ca53bdc89cf" default))
'(package-selected-packages
'(a ace-jump-helm-line ace-link afternoon-theme aggressive-indent aio
alect-themes alert all-the-icons ample-theme ample-zen-theme
anaconda-mode anti-zenburn-theme apropospriate-theme auto-compile
auto-highlight-symbol auto-yasnippet autothemer badwolf-theme
birds-of-paradise-plus-theme blacken bubbleberry-theme bui busybee-theme
centered-cursor-mode cherry-blossom-theme chocolate-theme
clean-aindent-mode closql clues-theme code-cells code-review
color-theme-sanityinc-solarized color-theme-sanityinc-tomorrow
column-enforce-mode company company-anaconda company-box
company-quickhelp company-shell company-statistics company-terraform
company-web concurrent ctable cyberpunk-theme cython-mode dakrone-theme
dap-mode darkmine-theme darkokai-theme darktooth-theme deferred
define-word devdocs diminish dired-quick-sort disable-mouse django-theme
docker dockerfile-mode doom-themes dotenv-mode dracula-theme drag-stuff
dumb-jump edit-indirect editorconfig ef-themes elisp-def elisp-demos
elisp-slime-nav emacsql emmet-mode emojify emr epc espresso-theme
eval-sexp-fu evil-anzu evil-args evil-cleverparens evil-collection
evil-easymotion evil-escape evil-evilified-state evil-exchange
evil-goggles evil-iedit-state evil-indent-plus evil-lion evil-lisp-state
evil-matchit evil-mc evil-nerd-commenter evil-numbers evil-org
evil-surround evil-textobj-line evil-tutor evil-unimpaired
evil-visual-mark-mode evil-visualstar exotica-theme expand-region
eyebrowse eziam-themes fancy-battery farmhouse-themes fish-mode
flatland-theme flatui-theme flx-ido flycheck-bashate flycheck-elsa
flycheck-package flycheck-pos-tip forge frame-local gandalf-theme gh-md
ghub git-link git-messenger git-modes git-timemachine gitignore-templates
gntp gnuplot golden-ratio google-translate gotham-theme grandshell-theme
gruber-darker-theme gruvbox-theme haml-mode hc-zenburn-theme hcl-mode
helm-ag helm-c-yasnippet helm-comint helm-company helm-css-scss
helm-descbinds helm-git-grep helm-ls-git helm-lsp helm-make
helm-mode-manager helm-org helm-org-rifle helm-projectile helm-purpose
helm-pydoc helm-swoop helm-themes helm-xref hemisu-theme heroku-theme
hide-comnt hierarchy highlight-indentation highlight-numbers
highlight-parentheses hl-todo holy-mode htmlize hungry-delete hybrid-mode
impatient-mode importmagic indent-guide info+ inkpot-theme insert-shebang
inspector ir-black-theme jazz-theme jbeans-theme js-doc js2-mode
js2-refactor json-mode json-navigator json-reformat json-snatcher
kaolin-themes light-soap-theme link-hint live-py-mode livid-mode
load-env-vars log4e lorem-ipsum lsp-docker lsp-mode lsp-origami
lsp-pyright lsp-treemacs lsp-ui lush-theme macrostep madhat2r-theme magit
magit-section markdown-mode markdown-toc material-theme minimal-theme
modus-themes moe-theme molokai-theme monochrome-theme monokai-theme
multi-line multiple-cursors mustang-theme nameless naquadah-theme
nginx-mode noctilux-theme nodejs-repl nose npm-mode obsidian-theme
occidental-theme oldlace-theme omtose-phellack-themes open-junk-file
org-alert org-caldav org-category-capture org-cliplink org-contrib
org-download org-jira org-mac-link org-mime org-pomodoro org-present
org-project-capture org-projectile org-rich-yank org-superstar
organic-green-theme orgit orgit-forge origami overseer ox-jira
ox-twbs pandoc-mode paradox password-generator pcre2el
phoenix-dark-mono-theme phoenix-dark-pink-theme pip-requirements pipenv
pippel planet-theme poetry popwin pos-tip prettier-js professional-theme
pug-mode purple-haze-theme py-isort pydoc pyenv-mode pylookup pytest
pythonic pyvenv quickrun railscasts-theme rainbow-delimiters
rebecca-theme request restart-emacs reverse-theme sass-mode scss-mode
seti-theme shfmt simple-httpd skewer-mode slim-mode smeargle smyx-theme
soft-charcoal-theme soft-morning-theme soft-stone-theme solarized-theme
soothe-theme space-doc spacegray-theme spaceline spacemacs-purpose-popwin
spacemacs-whitespace-cleanup sphinx-doc string-edit-at-point
string-inflection subatomic-theme subatomic256-theme sublime-themes
sunny-day-theme symbol-overlay symon tablist tagedit tango-2-theme
tango-plus-theme tangotango-theme tao-theme term-cursor tern
terraform-mode toc-org toml-mode toxi-theme transient treemacs-evil
treemacs-icons-dired treemacs-magit treemacs-persp treemacs-projectile
treepy twilight-anti-bright-theme twilight-bright-theme twilight-theme
ujelly-theme underwater-theme undo-fu undo-fu-session vi-tilde-fringe
vim-powerline volatile-highlights vundo web-beautify web-completion-data
web-mode which-key white-sand-theme winum with-editor writeroom-mode
ws-butler yaml yaml-mode yapfify yasnippet yasnippet-snippets
zen-and-art-theme zenburn-theme zonokai-emacs)))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
)
)