Changed keybinding for company-try-hard completion

Author: hatlafax

init.org

@@ -6777,7 +6777,7 @@ doom-oceanic-next, kaolin-dark, kaolin-aurora, kaolin-blossom, kaolin-breeze, ka
 kaolin-eclipse, kaolin-ocean, kaolin-galaxy, kaolin-valley-dark, kaolin-valley-light, kaolin-temple,
 vscode-dark-plus, nimbus, modus-operandi, modus-operandi-tinted, modus-operandi-deuteranopia, modus-operandi-tritanopia,
 modus-vivendi, modus-vivendi-tinted, modus-vivendi-deuteranopia, modus-vivendi-tritanopia,
-ef-day, ef-night, ef-light, ef-dark, ef-duo-light, ef-duo-dark, ef-maris-light, ef-maris-dark, ef-spring, ef-autumn, 
+ef-day, ef-night, ef-light, ef-dark, ef-duo-light, ef-duo-dark, ef-maris-light, ef-maris-dark, ef-spring, ef-autumn,
 ef-summer, ef-winter, ef-deuteranopia-dark, ef-symbiosis, leuven.
 ")
 
@@ -10119,7 +10119,7 @@ Package [[https://github.com/ema2159/centaur-tabs][Centaur tabs]] provides aesth
                   (not (file-name-extension name)))
              )))
 
-        
+
 
         ;(centaur-tabs-mode t)
     :custom
@@ -13296,17 +13296,17 @@ the command again to try the next backend.
 
 | Key binding | Command              | Description                                                                                                                  |
 |-------------+----------------------+------------------------------------------------------------------------------------------------------------------------------|
-| =C-TAB=       | =M-x company-try-hard= | Try hard to find a completion. If none of the current completions look good, call the command again to try the next backend. |
+| =H-m <tab>= | =M-x company-try-hard= | Try hard to find a completion. If none of the current completions look good, call the command again to try the next backend. |
 |-------------+----------------------+------------------------------------------------------------------------------------------------------------------------------|
 
 
 #+begin_src emacs-lisp :tangle config/init-advanced-company.el
 (use-package company-try-hard
     :bind
         (
-            ("C-<tab>" . company-try-hard)
+            ("H-m <tab>" . company-try-hard)
             :map company-active-map
-                ("C-<tab>" . company-try-hard)
+                ("H-m <tab>" . company-try-hard)
         )
 )
 #+end_src
@@ -15482,22 +15482,23 @@ Following a survey of the [[https://emacs-lsp.github.io/lsp-mode/][lsp-mode]] co
         (setq lsp-auto-guess-root t)
         (setq lsp-enable-indentation t)
         (setq lsp-enable-imenu t)
-        (setq lsp-file-watch-threshold 1500)
+        (setq lsp-file-watch-threshold 15000)
         (setq lsp-prefer-flymake nil)
 
         (setq lsp-enable-symbol-highlighting t)
         (setq lsp-lens-enable t)
         (setq lsp-modeline-code-actions-enable t)
 
-        (setq lsp-completion-enable nil)
+        (setq lsp-completion-enable t)
+        (setq lsp-enable-completion-at-point t)
 
         (setq lsp-modeline-diagnostics-enable nil)
 
         (setq lsp-signature-auto-activate nil)
-        (setq lsp-modeline-workspace-status-enable nil)
+        (setq lsp-modeline-workspace-status-enable t)
         (setq lsp-semantic-tokens-enable t)
         (setq lsp-progress-spinner-type 'progress-bar-filled)
-        (setq lsp-enable-file-watchers nil)
+        (setq lsp-enable-file-watchers t)
 
         ;;(setq lsp-auto-execute-action nil)
         ;;(setq lsp-before-save-edits nil)
@@ -15617,7 +15618,7 @@ CodeLens are links in your code:
         (setq lsp-ui-doc-use-childframe t)
         (setq lsp-ui-doc-use-webkit t)
         (setq lsp-ui-flycheck-enable nil)
-        (setq lsp-ui-sideline-enable nil)
+        (setq lsp-ui-sideline-enable t)
         (setq lsp-ui-sideline-ignore-duplicate t)
         (setq lsp-ui-sideline-show-symbol t)
         (setq lsp-ui-sideline-show-hover t)
@@ -17527,9 +17528,9 @@ The following are basic [[https://code.orgmode.org/bzg/org-mode][org-mode]] sett
 
         (setq org-hide-emphasis-markers t)
 
-
         ;; https://abode.karthinks.com/org-latex-preview/#org99ce71c
-        (setq org-format-latex-options (plist-put org-format-latex-options :scale 1.5))
+        (setq org-format-latex-options (plist-put org-format-latex-options :scale 1.0))
+
         ;;(plist-put org-latex-preview-appearance-options :page-width 0.8)
         (setq org-latex-preview-numbered t)
         (setq org-latex-preview-live t)
@@ -17560,7 +17561,32 @@ The following are basic [[https://code.orgmode.org/bzg/org-mode][org-mode]] sett
         )
 
         (add-hook 'org-clock-out-hook 'psimacs/internal/org-remove-empty-drawer-on-clock-out 'append)
+)
+#+end_src
 
+**** Org-latex-preview hack
+
+The following is a hack for windows only. The =org-latex-preview= does not work out of the box for
+*Psimacs* on Windows. The reason is a handling of a shorted relative file name that is not properly
+consumed by the MSYS2 backend. In order to circumvent this problem, *Psimacs* provides the following
+argument filter advise for function =org-compile-file=:
+
+#+begin_src emacs-lisp :tangle config/init-major-modes-org-mode.el :var file-description="Major Modes - org-mode setup"
+;;
+;; Provide an advise for function org-compile-file
+;;
+(use-package org
+    :straight nil
+    :config
+        (when psimacs/system/is-win32-p
+            (defun psimacs/config/org-compile-file (args)
+                "Filter argument advice: replace the first argument SOURCE by its non-shortened name"
+                (setcar args (file-truename (nth 0 args)))
+                args
+            )
+
+            (advice-add 'org-compile-file :filter-args #'psimacs/config/org-compile-file)
+        )
 )
 #+end_src
 
@@ -20937,7 +20963,6 @@ Keybinding for the *org note buffer* in =org-noter-mode=:
 )
 #+end_src
 
-
 ** PlantUML Mode
 
 The package [[https://github.com/skuro/plantuml-mode][plantuml-mode]] provides access to the nice