62 lines
1.8 KiB
EmacsLisp
62 lines
1.8 KiB
EmacsLisp
;;; emacs-core.el --- Summary
|
|
;;; Commentary:
|
|
;;; Code:
|
|
|
|
;; -*- lexical-binding: t; -*-
|
|
|
|
(setq gc-cons-threshold (* 500 1024 1024))
|
|
|
|
(add-hook 'after-init-hook (lambda () (setq gc-cons-threshold (* 5 1024 1024))))
|
|
|
|
(setq straight-use-package-by-default t)
|
|
(require 'use-package)
|
|
(straight-use-package 'diminish)
|
|
(require 'diminish)
|
|
|
|
(unless (file-directory-p (expand-file-name "~/.emacs.d/straight/versions")) (make-directory (expand-file-name "~/.emacs.d/straight/versions") t))
|
|
(use-package org)
|
|
|
|
(setq custom-file (expand-file-name "custom.el" user-emacs-directory))
|
|
(when (file-exists-p custom-file) (load custom-file))
|
|
|
|
(defvar my-laptop-p (equal (system-name) "lilitop"))
|
|
(defvar my-server-p (and (equal (system-name) "localhost") (equal user-login-name "root")))
|
|
(defvar my-phone-p (not (null (getenv "ANDROID_ROOT")))
|
|
"If non-nil, GNU Emacs is running on Termux.")
|
|
(when my-phone-p (defvar gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3"))
|
|
(global-auto-revert-mode) ; simplifies syncing
|
|
|
|
(savehist-mode)
|
|
|
|
(when (fboundp 'flycheck-mode)
|
|
(setq flycheck-global-modes nil)
|
|
(global-flycheck-mode -1))
|
|
(when (fboundp 'flymake-mode)
|
|
(setq help-at-pt-display-when-idle t)
|
|
;; Disable flymake in all buffers
|
|
(add-hook 'find-file-hook (lambda () (flymake-mode -1))))
|
|
|
|
(use-package magit)
|
|
|
|
(setq user-full-name "Amr Gharbeia")
|
|
(defvar email-address "amr@gharbeia.net")
|
|
(defvar calendar-latitude 39.0)
|
|
(defvar calendar-longitude -77.1)
|
|
(defvar calendar-location-name "Washington, DC")
|
|
(defvar calendar-time-zone -300)
|
|
(defvar calendar-standard-time-zone-name "EST")
|
|
(defvar calendar-daylight-time-zone-name "EDT")
|
|
|
|
(add-hook 'server-done-hook (lambda () (delete-frame)))
|
|
|
|
(desktop-save-mode t)
|
|
|
|
(use-package password-store)
|
|
|
|
(use-package auth-source
|
|
:config (auth-source-pass-enable)
|
|
)
|
|
|
|
(provide 'emacs-core)
|
|
;;; emacs-core.el ends here
|