From ff561ccb9aa35a7fa337e3daef77e1b3b9ef410c Mon Sep 17 00:00:00 2001 From: Sameer Rahmani Date: Mon, 8 Mar 2021 14:10:13 +0000 Subject: [PATCH] Add a very basic editor cube to setup some basic functionality --- core/cubes/editor.el | 71 ++++++++++++++++++++++++++++++++++++++++++++ core/cubes/elisp.el | 4 --- 2 files changed, 71 insertions(+), 4 deletions(-) create mode 100644 core/cubes/editor.el diff --git a/core/cubes/editor.el b/core/cubes/editor.el new file mode 100644 index 0000000..0b52f40 --- /dev/null +++ b/core/cubes/editor.el @@ -0,0 +1,71 @@ +;;; ElispCube --- The elisp cube for FG42 -*- lexical-binding: t; -*- +;; +;; Copyright (c) 2010-2021 Sameer Rahmani & Contributors +;; +;; Author: Sameer Rahmani +;; URL: https://gitlab.com/FG42/FG42 +;; Version: 3.0.0 +;; +;; This program is free software; you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. +;; +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. +;; +;; You should have received a copy of the GNU General Public License +;; along with this program. If not, see . +;; +;;; Commentary: +;;; Code: +(require 'fpkg) +(require 'fg42/cube) + + +(defvar fg42/editor-defaults '() + "Default features of the editor cube.") + + +(defcube fg42/editor-cube + (fpkg/use rainbow-delimiters + ;; It doesn't work due to a problem/conflict in rainbow-delimiters + ;; But we use it any way they might fix it + :hook (prog-mode . rainbow-delimiters-mode)) + + ;; In the following section we're setting some default behavior of FG42. + ;; Most of these configuration are opiniated and I think most of people + ;; shared the same opinion or don't care at all. + + ;; Remove splash screen + (setq inhibit-splash-screen t) + ;; scratch should be scratch + (setq initial-scratch-message nil) + ;; Don't allow tab as indent + (setq-default indent-tabs-mode nil) + ;; Default indent width + (setq tab-width 2) + ;; Share the clipboard with X applications + (setq x-select-enable-clipboard t) + + ;; Global configurations + (tool-bar-mode -1) + (scroll-bar-mode -1) + (menu-bar-mode -1) + (column-number-mode t) + (show-paren-mode t) + + (defalias 'yes-or-no-p 'y-or-n-p) + + ;; Hooks --- + ;; Deletel extra trailing white spaces on save + (add-hook 'before-save-hook 'delete-trailing-whitespace) + + ;; Enable rainbow-delimiters for programming + (add-hook 'prog-mode-hook #'rainbow-delimiters-mode)) + + +(provide 'cubes/editor) +;;; editor.el ends here diff --git a/core/cubes/elisp.el b/core/cubes/elisp.el index d13d5ad..051e7ac 100644 --- a/core/cubes/elisp.el +++ b/core/cubes/elisp.el @@ -20,10 +20,6 @@ ;; along with this program. If not, see . ;; ;;; Commentary: -;; Cubes are the building blocks of any `FG42' editor. Each `cube' is a -;; unit which defines different abilities in a deterministic and idempotent -;; way. Cubes are composable and a composition of cubes creates an editor. -;; ;;; Code: (require 'fpkg) (require 'fg42/cube)