From 875a3ec06b7978d7e506b781990f9e40dab5723d Mon Sep 17 00:00:00 2001
From: Alexandre LUCAZEAU <alexandre@dri.fr>
Date: Wed, 9 Feb 2022 16:51:03 +0100
Subject: [PATCH] FIX : org-mode PATH to files ADD : (setq org-startup-folded
 t)

---
 DELL/nixpkgs/configs/init.el | 56 +++++++++++++++++++++++++++++++-----
 1 file changed, 49 insertions(+), 7 deletions(-)

diff --git a/DELL/nixpkgs/configs/init.el b/DELL/nixpkgs/configs/init.el
index f091402..5d8ee55 100644
--- a/DELL/nixpkgs/configs/init.el
+++ b/DELL/nixpkgs/configs/init.el
@@ -2,7 +2,38 @@
 ;;(tool-bar-mode -1)   
 ;;(tooltip-mode -1)
 ;;(menu-bar-mode -1)
+(column-number-mode 't) ; show current column in status bar
 (set-fringe-mode 10)
+
+;; Indent 4 spaces by default. Use the "BSD" style for C-like languages.
+(setq c-default-style
+      (quote ((java-mode . "java")
+              (awk-mode . "awk")
+              (other . "bsd")))
+      c-basic-offset 4)
+
+;; Use 4 spaces for one tab visually.
+(setq tab-width 4)
+
+(show-paren-mode t) ; highlight matching open and close parentheses
+(global-hl-line-mode) ; highlight current line
+(global-visual-line-mode t) ; wrap long lines
+(setq split-window-preferred-function
+  'visual-fill-column-split-window-sensibly) ; wrap at window boundary
+
+(global-whitespace-mode) ; enable whitespace handling by default
+(setq
+  whitespace-style ; see (apropos 'whitespace-style)
+  '(face ; viz via faces
+    trailing ; trailing blanks visualized
+    lines-tail ; lines beyond whitespace-line-column visualized
+    space-before-tab
+    space-after-tab
+    newline ; lines with only blanks visualized
+    indentation ; spaces used for indent when config wants tabs
+    empty ; empty lines at beginning or end or buffer
+    )
+  whitespace-line-column 100) ; column at which whitespace-mode says the line is too long
 ;;(set-face-attribute 'default nil :font "JetBrains Mono" :height 150)
 (global-set-key (kbd "C-c c") 'org-capture)
 (global-set-key (kbd "C-c a") 'org-agenda)
@@ -10,6 +41,12 @@
 (setq disabled-command-function nil)
 (setq inhibit-startup-screen t)
 (setq visible-bell t)
+
+; Advanced per-language checks.
+(require 'flycheck)
+(global-flycheck-mode 1)
+(setq flycheck-checker-error-threshold 1000) ; for large go files and the escape checker
+
 (setq flycheck-check-syntax-automatically '(mode-enabled save))
 
 ;; Backup
@@ -105,30 +142,32 @@
 (use-package bbdb
   :init (bbdb-initialize 'gnus 'message)
   :init (bbdb-mua-auto-update-init 'gnus 'message)
-  :config (setq bbdb-file "~/Nextcloud/13_Org/contacts/bbdb")
+  :config (setq bbdb-file "~/Nextcloud/PRIVE/13_Org/contacts/bbdb")
   :config (setq bbdb-mua-auto-update-p 'create))
 
 (use-package org
   :config
+  (setq org-startup-folded t)
   (setq org-agenda-files
-  	  "~/Nextcloud/13_Org/agenda.org")
+  	  "~/Nextcloud/PRIVE/13_Org/agenda.org")
   (setq org-refile-use-outline-path 'file)
   (setq org-refile-targets
-	'(("~/Nextcloud/13_Org/DRI.org" :maxlevel . 3)
-	  ("~/Nextcloud/13_Org/perso.org" :level . 1)
-  	  ("~/Nextcloud/13_Org/pizajoffre.org" :level . 1)))
+	'(("~/Nextcloud/PRIVE/13_Org/DRI.org" :maxlevel . 3)
+	  ("~/Nextcloud/PRIVE/13_Org/perso.org" :level . 1)
+  	  ("~/Nextcloud/PRIVE/13_Org/pizajoffre.org" :level . 1)))
   (setq org-todo-keywords
 	'((sequence "TODO(t)" "PENDING(p)" "|" "CANCELLED(c)" "DONE(d)")))
   (setq org-todo-keyword-faces
 	'(("TODO" . (:foreground "#c678dd" :weight bold))
 	  ("PENDING" . (:background "#3f444a" :foreground "#ff6c6b" :weight bold))))
   (setq org-capture-templates
-	'(("i" "Inbox" entry (file "~/Nextcloud/13_Org/DRI.org") "* TODO %i%?")
-	  ("a" "Agenda" entry (file "~/Nextcloud/13_Org/agenda.org") "* TODO %i%?\nSCHEDULED: %(org-insert-time-stamp (org-read-date nil t \"+0d\"))")))
+	'(("i" "Inbox" entry (file "~/Nextcloud/PRIVE/13_Org/DRI.org") "* TODO %i%?")
+	  ("a" "Agenda" entry (file "~/Nextcloud/PRIVE/13_Org/agenda.org") "* TODO %i%?\nSCHEDULED: %(org-insert-time-stamp (org-read-date nil t \"+0d\"))")))
   (setq org-agenda-custom-commands
 	'(("t" "Today" tags-todo "+LEVEL=1+CATEGORY=\"tasks\"|+SCHEDULED<=\"<today>\"|+DEADLINE<=\"<today>\""))))
 
 (use-package magit)
+(setq magit-fetch-modules-jobs 16); fetch 16 modules in parallel
 
 (use-package ledger-mode)
 
@@ -143,6 +182,9 @@
   :after (counsel projectile)
   :init (counsel-projectile-mode))
 
+(require 'yasnippet)
+(yas-global-mode 1)
+
 (use-package which-key
   :init (which-key-mode)
   :config (setq which-key-idle-delay 0.5))