[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/detached d8e657cc56: Replace usage of kill-region with
From: |
ELPA Syncer |
Subject: |
[elpa] externals/detached d8e657cc56: Replace usage of kill-region with delete-region |
Date: |
Mon, 18 Jul 2022 11:57:27 -0400 (EDT) |
branch: externals/detached
commit d8e657cc569da2ad0f1916aa0b5dbc444f0675ff
Author: Niklas Eklund <niklas.eklund@posteo.net>
Commit: Niklas Eklund <niklas.eklund@posteo.net>
Replace usage of kill-region with delete-region
---
detached-compile.el | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/detached-compile.el b/detached-compile.el
index 9a9ba616bd..4847b91395 100644
--- a/detached-compile.el
+++ b/detached-compile.el
@@ -124,12 +124,11 @@ Optionally EDIT-COMMAND."
(defun detached-compile--replace-modesetter ()
"Replace the modsetter inserted by `compilation-start'."
(save-excursion
- (let ((kill-ring nil)
- (inhibit-read-only t)
+ (let ((inhibit-read-only t)
(regexp (rx (regexp "^dtach ") (or "-c" "-a") (regexp
".*\.socket.*$"))))
(goto-char (point-min))
(when (re-search-forward regexp nil t)
- (kill-region (match-beginning 0) (match-end 0))
+ (delete-region (match-beginning 0) (match-end 0))
(insert (detached--session-command detached--current-session))))))
(defun detached-compile--compilation-detached-filter ()
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/detached d8e657cc56: Replace usage of kill-region with delete-region,
ELPA Syncer <=