From 09dc0fea94658d57256efae5f575c26a3564e1bc Mon Sep 17 00:00:00 2001 From: rearman Date: Tue, 24 Feb 2026 10:21:48 -0500 Subject: [PATCH] change up skeletons and abbrevs remove unused abbrevs, load skeletons in base init (not package specific), add a more useful skel/abbrev. --- abbrev_defs | 6 +----- init.el | 3 ++- re/re-packages.el | 1 - re/{re-org-skeletons.el => re-skeletons.el} | 12 +++++++++--- 4 files changed, 12 insertions(+), 10 deletions(-) rename re/{re-org-skeletons.el => re-skeletons.el} (82%) diff --git a/abbrev_defs b/abbrev_defs index 27427d7..6e8b076 100644 --- a/abbrev_defs +++ b/abbrev_defs @@ -2,11 +2,7 @@ (when (equal system-type 'windows-nt) (define-abbrev-table 'global-abbrev-table '( - ("hfac" "" howm-facility :count 0) - ("hper" "" howm-person :count 0) + ("wol" "" workorder-link :count 0) ("oelisp" "" skel-org-block-elisp :count 0) - ("ofac" "" skel-facility-properties :count 0) - ("oper" "" skel-person-properties :count 0) ("osrc" "" skel-org-block :count 0) - ("owo" "" skel-workorder-properties :count 0) ))) diff --git a/init.el b/init.el index ac791e0..f7760e1 100644 --- a/init.el +++ b/init.el @@ -24,7 +24,8 @@ (lambda () (require 're-repl-defuns) (require 're-pass-alike) - (require 're-dired-defuns))) + (require 're-dired-defuns) + (require 're-skeletons))) (add-to-list 'auto-mode-alist '("\\.keymap\\'" . c-mode)) (add-to-list 'auto-mode-alist '("\\.dtsi\\'" . c-mode)) diff --git a/re/re-packages.el b/re/re-packages.el index 285cfe2..aac3371 100644 --- a/re/re-packages.el +++ b/re/re-packages.el @@ -101,7 +101,6 @@ :config (require 're-org) (require 're-org-defuns) - (require 're-org-skeletons) :bind (("C-c l" . org-store-link) ("C-c a" . org-agenda) diff --git a/re/re-org-skeletons.el b/re/re-skeletons.el similarity index 82% rename from re/re-org-skeletons.el rename to re/re-skeletons.el index ec976de..11484cd 100644 --- a/re/re-org-skeletons.el +++ b/re/re-skeletons.el @@ -1,4 +1,4 @@ -;;; re-org-skeletons.el -*- lexical-binding: t; -*- +;;; re-skeletons.el -*- lexical-binding: t; -*- ;; This file is not part of GNU Emacs ;;; Code: @@ -54,5 +54,11 @@ "* TODO Workorder " _ - ":#:customer:city:state:topics:\n") -(provide 're-org-skeletons) -;;; re-org-skeletons.el ends here +(define-skeleton workorder-link + "part of a link to a workorder, just enter the number." + "" + "https://eservice.r717.net/index.php/PLC_workorders/store/" + _ -) + +(provide 're-skeletons) +;;; re-skeletons.el ends here -- 2.39.5