diff options
| author | Hanketsu <hanketsu@egregore.fun> | 2024-12-21 17:03:51 +0100 |
|---|---|---|
| committer | Hanketsu <hanketsu@egregore.fun> | 2025-01-16 16:45:28 +0100 |
| commit | ac97d1deb21ed6a56dfc3ac02139c60328fe3f6c (patch) | |
| tree | 0512636a72aa9b853ab75bb6addce6e880d54726 /snippets/tempel/text-mode.eld | |
| parent | 7236f86e02e14d83d092ffbf2446b46e6312f28e (diff) | |
Remove obsolete snippets.
* snippets/tempel/text-mode.eld: Remove snippets.
Diffstat (limited to 'snippets/tempel/text-mode.eld')
| -rw-r--r-- | snippets/tempel/text-mode.eld | 34 |
1 files changed, 0 insertions, 34 deletions
diff --git a/snippets/tempel/text-mode.eld b/snippets/tempel/text-mode.eld index a0b4516..177f6c7 100644 --- a/snippets/tempel/text-mode.eld +++ b/snippets/tempel/text-mode.eld @@ -92,40 +92,6 @@ text-mode :when (bound-and-true-p git-commit-mode) (cdr (magit-staged-files)) "\n")) -(addcl\ "battering: Add cl-" - (p (replace-regexp-in-string - "^cl-" "" (with-temp-buffer - (magit-git-wash #'magit-diff-wash-diffs - "diff" "--staged") - (beginning-of-buffer) - (when (search-forward "+(define-public " nil 'noerror) - (replace-regexp-in-string - "^sbcl-" "" - (thing-at-point 'sexp 'no-properties))))) - var) - "." n n - "* " (p (or (car (magit-staged-files)) "")) - " (cl-" (s var) - ", ecl-" (s var) - ", sbcl-" (s var) "): New variables.") - -(https\ "battering: " - (p (with-temp-buffer - (magit-git-wash #'magit-diff-wash-diffs - "diff" "--staged") - (goto-char (point-min)) - (when (re-search-forward "^[ ]*(define-public \\(\\S-+\\)" - nil 'noerror) - (match-string-no-properties 1))) - var) - ": Use HTTPS home page." n n - "* " (p (or (car (magit-staged-files)) "")) - " (" (s var) ")[home-page]: Use HTTPS." - n - (mapconcat (lambda (file) (concat "* " file)) - (cdr (magit-staged-files)) - "\n")) - (move\ "battering: " (p (with-temp-buffer (magit-git-wash #'magit-diff-wash-diffs |