testing

init.el

@@ -10,8 +10,6 @@
 ;;; Time Mark
 (setq emacs-load-start-time (current-time))
 
-(setq package-check-signature 'allow-unsigned)
-
 ;;; Fix TLS emacs 26.x
 (if (version<= emacs-version "26.2")
     (setq gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3"))
@@ -55,6 +53,12 @@
     (setq user-emacs-directory default-directory))
 (push (concat user-emacs-directory "modules") load-path)
 
+;;; Native compilation (Emacs 28+)
+(when (fboundp 'native-comp-available-p)
+  (setq native-comp-async-report-warnings-errors nil
+        native-comp-deferred-compilation t
+        native-comp-jit-compilation t))
+
 ;;;------------------------------
 ;;; Features
 ;;;------------------------------

modules/init-company.el

@@ -4,19 +4,20 @@
 
 ;;; Code:
 (use-package company
-  :defer 5
+  :defer 0.5
   :diminish
   :bind
   (:map company-mode-map
         ("<backtab>" . company-complete))
-  :config
-  ;; Global
-  (setq company-idle-delay 1
-        company-minimum-prefix-length 1
+  :init
+  (setq company-idle-delay 0.3
+        company-minimum-prefix-length 2
         company-show-numbers nil
-        company-tooltip-limit 20)
-
-  ;; Facing
+        company-tooltip-limit 15
+        company-dabbrev-ignore-case t
+        company-dabbrev-downcase nil)
+  :config
+  ;; Face customization
   (unless (face-attribute 'company-tooltip :background)
     (set-face-attribute 'company-tooltip nil :background "black" :foreground "gray40")
     (set-face-attribute 'company-tooltip-selection nil :inherit 'company-tooltip :background "gray15")
@@ -24,8 +25,6 @@
     (set-face-attribute 'company-preview-common nil :inherit 'company-preview :foreground "gray40")
     (set-face-attribute 'company-scrollbar-bg nil :inherit 'company-tooltip :background "gray20")
     (set-face-attribute 'company-scrollbar-fg nil :background "gray40"))
-
-  ;; Activating globally
   (global-company-mode t))
 
 (use-package company-quickhelp

modules/init-dashboard.el

@@ -4,36 +4,22 @@
 
 ;;; Code:
 (use-package dashboard
-  :pin "MELPA"
   :ensure t
+  :init
+  (setq dashboard-banner-logo-title "Emacs personal"
+        dashboard-startup-banner 'logo
+        dashboard-center-content t
+        dashboard-show-shortcuts t
+        dashboard-set-heading-icons t
+        dashboard-set-file-icons t
+        dashboard-set-footer nil
+        dashboard-items '((recents    . 5)
+                          (bookmarks  . 5)
+                          (projects   . 5)
+                          (agenda     . 5)
+                          (registers  . 5)))
   :config
-  ;; Dashboard configuration
-  (dashboard-setup-startup-hook)
-  (setq dashboard-banner-logo-title "Emacs personal")
-  (setq dashboard-startup-banner 'logo)
-  (setq dashboard-center-content t)
-  (setq dashboard-show-shortcuts t)
-  (setq dashboard-set-heading-icons t)
-  (setq dashboard-set-file-icons t)
-  (setq dashboard-set-footer nil)
-
-  ;; Configuration of dashboard sections
-  (setq num-recents 5)
-  (setq num-bookmarks 5)
-  (setq num-projects 5)
-  (setq num-agenda 5)
-  (setq num-registers 5)
-
-  ;; Note:
-  ;; grave accent (`) is used to access Emacs commands known like "execute commands".
-  ;; syntax ,variable is used in context of backquote (`) macro to evaluate
-  ;; the variable and replace it with its value time of evaluation.
-  ;; This is known as "unquote" and is useful for constructing complex forms or lists.
-  (setq dashboard-items `((recents  . ,num-recents)
-                          (bookmarks . ,num-bookmarks)
-                          (projects . ,num-projects)
-                          (agenda . ,num-agenda)
-                          (registers . ,num-registers))))
+  (dashboard-setup-startup-hook))
 
 (provide 'init-dashboard)
 ;;; init-dashboard.el ends here

modules/init-elpa.el

@@ -25,15 +25,19 @@
 ;; =================
 
 (setq package-native-compile t)
+(setq package-check-signature 'allow-unsigned)
+(setq read-process-output-max (* 1024 1024))
 (package-initialize)
 
 (unless (package-installed-p 'use-package)
-  (package-refresh-contents)
+  (unless (assoc 'melpa package-archives)
+    (package-refresh-contents))
   (package-install 'use-package))
 
-(eval-when-compile
-  (require 'use-package))
-(setq use-package-always-ensure t)
+(require 'use-package)
+(setq use-package-always-ensure t
+      use-package-always-defer t
+      use-package-compute-statistics t)
 ;; =====================================================
 ;; End use-package
 ;; =====================================================

modules/init-gui.el

@@ -10,16 +10,23 @@
 (setq use-dialog-box nil)
 (setq inhibit-startup-screen t)
 (setq inhibit-startup-echo-area-message t)
+(setq inhibit-startup-message t)
+(setq inhibit-hello-hook t)
+(setq inhibit-x-resources t)
 (when (display-graphic-p)
   (tool-bar-mode 0)
   (scroll-bar-mode 0)
   (menu-bar-mode 0))
-(setq make-backup-files nil) ; stop creating backup~ files
-(setq auto-save-default nil) ; stop creating #autosave# files
-(setq create-lockfiles nil)  ; stop creating #create-lockfiles
-;; Suppressing ad-handle-definition Warnings in Emacs
+(setq make-backup-files nil)
+(setq auto-save-default nil)
+(setq create-lockfiles nil)
 (setq ad-redefinition-action 'accept)
 
+;; Disable unnecessary features for speed
+(setq ring-bell-function 'ignore)
+(setq use-short-answers t)
+(setq confirm-kill-emacs nil)
+
 ;;------------------------------
 ;; Core settings | UTF-8 please
 ;;------------------------------

modules/init-ivy.el

@@ -5,18 +5,23 @@
 ;;; Code:
 (use-package counsel
   :after ivy
-  :config (counsel-mode))
+  :init
+  (setq counsel-mode t)
+  :config
+  (counsel-mode))
 
 (use-package ivy
-  :defer 0.1
+  :defer 0.2
   :diminish
   :bind (("C-c C-r" . ivy-resume)
          ("C-x B" . ivy-switch-buffer-other-window))
-  :commands ivy-mode
-  :custom
-  (ivy-count-format "(%d/%d) ")
-  (ivy-use-virtual-buffers t)
-  :config (ivy-mode))
+  :init
+  (setq ivy-count-format "(%d/%d) "
+        ivy-use-virtual-buffers t
+        ivy-fixed-height-minibuffer t
+        ivy-virtual-abbreviate 'full)
+  :config
+  (ivy-mode))
 
 (use-package ivy-rich
   :after ivy

modules/init-projectile.el

@@ -5,9 +5,16 @@
 ;;; Code:
 ;; Projectile
 (use-package projectile
-  :ensure t
+  :defer 0.3
   :init
-  (projectile-mode))
+  (setq projectile-enable-caching t
+        projectile-completion-system 'ivy
+        projectile-switch-project-action 'projectile-commander
+        projectile-kill-buffers-filter 'kill-all-buffer-p
+        projectile-auto-discover t
+        projectile-verbose nil)
+  :config
+  (projectile-mode +1))
 
 (provide 'init-projectile)
 ;;; init-projectile.el ends here

modules/init-vscode-theme.el

@@ -5,8 +5,8 @@
 ;;; Code:
 
 (use-package vscode-dark-plus-theme
-  :pin "MELPA"
   :ensure t
+  :demand t
   :config
   (load-theme 'vscode-dark-plus t)
 
@@ -41,8 +41,13 @@
                         :foreground "#FFFFFF")
     )
 
-  ;; Invoke color
-  (current-dark-color))
+  ;; Apply colors after frame is created
+  (if (display-graphic-p)
+      (current-dark-color)
+    (add-hook 'after-make-frame-functions
+              (lambda (frame)
+                (select-frame frame)
+                (current-dark-color)))))
 
 (provide 'init-vscode-theme)