226HB.47733-Starfire

diff --git a/.confORG/doom.org b/.confORG/doom.org
index 353286b98389345c89e0e17a084a56079879e92d..6e40627ce359baa3876eecca16e0a4ebeff971b8 100644 (file)
--- 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"
 #+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í
 #+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
 #+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
 *** 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
 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
        ;;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)
 #+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
 (package! org-auto-tangle)
 #+end_src

diff --git a/prueba.org b/prueba.org
index 55adb8d72dd61b7cbd70d4478f325aca10af8c35..1d46715f44a5a91ccc80e30bc2c6f81dea061bcd 100644 (file)
--- 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
 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 (file)
index 0000000..e219c2f
--- /dev/null
+++ b/todo.org
@@ -0,0 +1,4 @@
+* Inbox
+** [ ] jolines
+
+[[file:~/tst.org::veamos que gestos hace]]