1 files changed, 65 insertions, 0 deletions
diff --git a/emacs/custom/my-settings.el b/emacs/custom/my-settings.el
new file mode 100644
index 0000000..a733004
--- /dev/null
+++ b/emacs/custom/my-settings.el
@@ -0,0 +1,65 @@
+;;; my-settings.el --- Sets a number of defaults
+;;; Commentary:
+
+;;; Code:
+(require 'use-package)
+
+(defvar my/custom-settings (expand-file-name "emacs-custom.el" user-emacs-directory)
+  "Path to Emacs custom variables.")
+
+;; set utf-8 as the default encoding
+(prefer-coding-system 'utf-8-unix)
+(setq locale-coding-system 'utf-8)
+(set-language-environment 'utf-8)
+(set-terminal-coding-system 'utf-8)
+(set-keyboard-coding-system 'utf-8)
+
+;; alias yes-or-no to y-or-n
+(fset 'yes-or-no-p 'y-or-n-p)
+
+(setq auto-save-default nil)                     ;; don't auto save files
+(setq auto-save-list-file-prefix nil)            ;; no backups
+(setq create-lockfiles nil)                      ;; don't use a lock file
+(setq custom-file my/custom-settings)            ;; where to save custom settings
+(setq make-backup-files nil)                     ;; really no backups
+(setq minibuffer-message-timeout 0.5)            ;; How long to display an echo-area message
+(setq next-screen-context-lines 5)               ;; scroll 5 lines at a time
+(setq require-final-newline t)                   ;; ensure newline exists at the end of the file
+(setq ring-bell-function 'ignore)                ;; really no bell
+(setq tab-always-indent 'complete)               ;; when using TAB, always indent
+(setq visible-bell nil)                          ;; no bell
+(setq column-number-mode t)                      ;; show column number in the mode line
+(setq-default indent-tabs-mode nil)              ;; turn off tab indentation
+(setq-default cursor-type 'box)                  ;; cursor is a horizontal bar
+(setq-default delete-by-moving-to-trash t)       ;; delete files by moving them to the trash
+(setq initial-scratch-message "")                ;; empty scratch buffer
+(setq garbage-collection-messages t)             ;; log when the gc kicks in
+
+(custom-set-variables
+ '(use-file-dialog nil)
+ '(use-dialog-box nil)
+ '(inhibit-startup-screen t)
+ '(inhibit-startup-message t)
+ '(inhibit-startup-echo-area-message t))
+
+(setq user-full-name "Franck Cuny"
+      user-mail-address "franck@fcuny.net"
+      add-log-mailing-address "franck@fcuny.net")
+
+;; delete buffers that have not been displayed in the last 3 days
+(use-package midnight
+  :config
+  (midnight-mode t))
+
+(use-package server
+  :hook (after-init . server-start))
+
+(use-package exec-path-from-shell
+  :ensure t
+  :config
+  (progn
+    (when (memq window-system '(mac ns))
+      (exec-path-from-shell-initialize))))
+
+(provide 'my-settings)
+;;; my-settings.el ends here