Skip to content

Instantly share code, notes, and snippets.

@lelanthran
Last active March 26, 2021 09:58
Show Gist options
  • Save lelanthran/b59e40c9f01e8d9924dea202b5bfcff5 to your computer and use it in GitHub Desktop.
Save lelanthran/b59e40c9f01e8d9924dea202b5bfcff5 to your computer and use it in GitHub Desktop.
(setq-default inhibit-startup-screen t)
(progn
(when (fboundp 'tool-bar-mode)
(tool-bar-mode -1))
(when (fboundp 'scroll-bar-mode)
(scroll-bar-mode -1))
(when (fboundp 'horizontal-scroll-bar-mode)
(horizontal-scroll-bar-mode -1)))
(setq-default scroll-step 1)
(setq-default indent-tabs-mode nil)
(setq transient-mark-mode t)
(set-face-attribute 'region nil :background "#666" :foreground "#ffffff")
(global-font-lock-mode 1)
; (setq-default inferior-lisp-program "/usr/bin/clisp -M /home/lmanickum/full.fas")
; (setq-default inferior-lisp-program "/usr/bin/sbcl --core /home/lmanickum/sbcl-clim.core")
(setq-default inferior-lisp-program "/usr/bin/ecl")
;(setq default-frame-alist
; '((top . 0) (left . 0)
; (width . 80) (height . 60)))
;(add-to-list 'default-frame-alist
; '(foreground-color . "grey"))
;(add-to-list 'default-frame-alist
; '(background-color . "black"))
; (global-hl-line-mode 1)
(setq standard-indent 3)
(setq c-basic-offset 3)
(setq make-backup-files nil)
(line-number-mode 1)
(column-number-mode 1)
; All the changes I made for org mode.
(add-hook 'org-mode-hook '(lambda () (setq fill-column 74)))
(add-hook 'org-mode-hook 'auto-fill-mode)
(setq org-todo-keywords
'((sequence "TODO" "IN-PROGRESS" "UNTESTED" "TESTED-U" "TESTED-I"
"|" "DONE" "SHIPPED")))
; Set the default frame width
(add-to-list 'default-frame-alist '(width . 125))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment