From 8112f6b1dc625f3130f52b6807300ba613a6ef11 Mon Sep 17 00:00:00 2001 From: Alexander Rosenberg Date: Tue, 1 Apr 2025 20:54:20 +0900 Subject: [PATCH] Fix trusted-content-p --- init.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/init.el b/init.el index 0ccafcc..853ca6c 100644 --- a/init.el +++ b/init.el @@ -106,8 +106,8 @@ '(:eval (my/-trusted-content-segment))) (defun my/-fix-trusted-content-p-for-remote (oldfun &rest args) (let ((source (or buffer-file-truename default-directory))) - (if (not source) - (apply oldfun args) + (if (or (not source) (eq trusted-content :all)) + (apply oldfun (ensure-list args)) (let* ((method (file-remote-p source 'method)) (host (file-remote-p source 'host)) (trusted-content (cl-remove-if-not