From: Tu Puta Madre Date: Tue, 11 Aug 2026 17:27:22 +0000 (-0600) Subject: 226HB.47733-Starfire X-Git-Url: https://git.ale.wales/?a=commitdiff_plain;h=HEAD;p=org.git 226HB.47733-Starfire --- diff --git a/.confORG/doom.org b/.confORG/doom.org index 353286b..6e40627 100644 --- a/.confORG/doom.org +++ b/.confORG/doom.org @@ -36,21 +36,32 @@ #+end_src ** Org #+begin_src emacs-lisp :tangle "/home/ale/.config/doom/config.el" -(setq org-directory "/org/") -(setq org-modern-table-vertical 1) -(setq org-modern-table t) -(add-hook 'org-mode-hook #'hl-todo-mode) -(custom-theme-set-faces! -'doom-old-hope -'(org-level-8 :inherit outline-3 :height 1.0) -'(org-level-7 :inherit outline-3 :height 1.0) -'(org-level-6 :inherit outline-3 :height 1.1) -'(org-level-5 :inherit outline-3 :height 1.2) -'(org-level-4 :inherit outline-3 :height 1.3) -'(org-level-3 :inherit outline-3 :height 1.4) -'(org-level-2 :inherit outline-2 :height 1.5) -'(org-level-1 :inherit outline-1 :height 1.6) -'(org-document-title :height 1.8 :bold t :underline nil)) +(use-package org + :ensure nil ; do not try to install it as it is built-in + :config + (setq org-M-RET-may-split-line '((default . nil))) + (setq org-insert-heading-respect-content t) + (setq org-log-done 'time) + (setq org-log-into-drawer t) + (setq org-directory "/home/ale/org/") + (setq org-agenda-files (list org-directory)) + (setq org-modern-table-vertical 1) + (setq org-modern-table t) + (add-hook 'org-mode-hook #'hl-todo-mode) + (custom-theme-set-faces! + 'doom-old-hope + '(org-level-8 :inherit outline-3 :height 1.0) + '(org-level-7 :inherit outline-3 :height 1.0) + '(org-level-6 :inherit outline-3 :height 1.1) + '(org-level-5 :inherit outline-3 :height 1.2) + '(org-level-4 :inherit outline-3 :height 1.3) + '(org-level-3 :inherit outline-3 :height 1.4) + '(org-level-2 :inherit outline-2 :height 1.5) + '(org-level-1 :inherit outline-1 :height 1.6) + '(org-document-title :height 1.8 :bold t :underline nil)) + + (setq org-todo-keywords + '((sequence "TODO(t)" "WAIT(w!)" "|" "CANCEL(c!)" "DONE(d!)")))) #+end_src ** Plugins Se agregan a packages.el, sin embargo la connfiguración va aquí @@ -60,6 +71,68 @@ After installing the package, run: #+begin_src emacs-lisp :tangle "/home/ale/.config/doom/config.el" ;; (require 'asciidoc-mode) #+end_src +*** colorful-mode +#+begin_src emacs-lisp :tangle "/home/ale/.config/doom/config.el" +(setq global-colorful-mode t) +#+end_src +*** company +este proviene de init.el, la configuración a continuación en teoria añade la funcionalidad de autocompletar en directorios. Para que no extrañe tanto a kakoune +#+begin_src emacs-lisp :tangle "/home/ale/.config/doom/config.el" +(after! company +(setq company-minimum-prefix-length 1 + company-idle-delay 0.1 + company-show-quick-access t + company-tooltip-limit 20 + company-tooltip-align-annotations t) + +;; Make company-files a higher priority backend +(setq company-backends (cons 'company-files (delete 'company-files company-backends))) + +;; Better file path completion settings +(setq company-files-exclusions nil) +(setq company-files-chop-trailing-slash t) + +;; Enable completion at point for file paths +(defun my/enable-path-completion () + "Enable file path completion using company." + (setq-local company-backends + (cons 'company-files company-backends))) + +;; Enable for all major modes +(add-hook 'after-change-major-mode-hook #'my/enable-path-completion) + +;; Custom file path trigger +(defun my/looks-like-path-p (input) + "Check if INPUT looks like a file path." + (or (string-match-p "^/" input) ;; Absolute path + (string-match-p "^~/" input) ;; Home directory + (string-match-p "^\\.\\{1,2\\}/" input))) ;; Relative path + +(defun my/company-path-trigger (command &optional arg &rest ignored) + "Company backend that triggers file completion for path-like input." + (interactive (list 'interactive)) + (cl-case command + (interactive (company-begin-backend 'company-files)) + (prefix (when (my/looks-like-path-p (or (company-grab-line "\\([^ ]*\\)" 1) "")) + (company-files 'prefix))) + (t (apply 'company-files command arg ignored)))) + +;; Add the custom path trigger to backends +(add-to-list 'company-backends 'my/company-path-trigger)) +(use-package! company-box + :after company + :hook (company-mode . company-box-mode) + :config + (setq company-box-show-single-candidate 'always + company-box-max-lines 20 + company-box-doc-delay 0.5) + + ;; Personalizar colores explícitamente + (set-face-attribute 'company-box-background nil :background "#2a2a2a") + (set-face-attribute 'company-box-selection nil :background "#3a4a5a" :foreground "#ffffff" :bold t) + (set-face-attribute 'company-tooltip-common nil :foreground "#ffaf00")) +#+end_src +a ver si ahora sí /org/hsP *** org-auto-tangle #+begin_src emacs-lisp :tangle "/home/ale/.config/doom/config.el" (use-package org-auto-tangle @@ -84,8 +157,8 @@ letras chinas, no hay necesidad de modificar debería investigar si alguno me ayuda a sugerencias estilo kakoune. SEGUN Claude company es el chido. hay que buscar videos #+begin_src emacs-lisp :tangle "/home/ale/.config/doom/init.el" :completion - ;;company ; the ultimate code completion backend - (corfu +orderless) ; complete with cap(f), cape and a flying feather! + company ; the ultimate code completion backend + ;; (corfu +orderless) ; complete with cap(f), cape and a flying feather! ;;helm ; the *other* search engine for love and life ;;ido ; the other *other* search engine... ;;ivy ; a search engine for love and life @@ -342,5 +415,7 @@ Doom's packages are pinned to a specific commit and updated from release to rele #+end_src #+begin_src emacs-lisp :tangle "/home/ale/.config/doom/packages.el" (package! asciidoc-mode) +(package! colorful-mode) +(package! company-box) (package! org-auto-tangle) #+end_src diff --git a/prueba.org b/prueba.org index 55adb8d..1d46715 100644 --- a/prueba.org +++ b/prueba.org @@ -10,3 +10,22 @@ seria agradable si sí pero no sabremos hasta probar #+END_SRC Y sí funcionó... fabuloso + +* Demonios viejo [33%] :tst: +** TODO task a +** DONE task b +CLOSED: [2026-08-09 Sun 22:51] +:LOGBOOK: +- State "DONE" from "CANCEL" [2026-08-09 Sun 22:51] +- State "CANCEL" from "WAIT" [2026-08-09 Sun 22:51] +- State "WAIT" from "TODO" [2026-08-09 Sun 22:51] +- State "DONE" from "CANCEL" [2026-08-09 Sun 22:51] +- State "CANCEL" from "WAIT" [2026-08-09 Sun 22:51] +- State "WAIT" from "TODO" [2026-08-09 Sun 22:51] +- State "DONE" from "CANCEL" [2026-08-09 Sun 22:51] +- State "CANCEL" from "WAIT" [2026-08-09 Sun 22:51] +- State "WAIT" from "TODO" [2026-08-09 Sun 22:51] +:END: +** TODO task c + +* TODO ahora :now: diff --git a/todo.org b/todo.org new file mode 100644 index 0000000..e219c2f --- /dev/null +++ b/todo.org @@ -0,0 +1,4 @@ +* Inbox +** [ ] jolines + +[[file:~/tst.org::veamos que gestos hace]]