From 23e9b7b407440037b23b1f7ad5f2010e41898621 Mon Sep 17 00:00:00 2001 From: Lin Jian Date: Sat, 28 Mar 2026 21:57:53 +0000 Subject: Defer calling `exiftool-run'. Previously, `exiftool-run' was called after (require 'exiftool), which caused compilation errors when compiling packages depending on exiftool.el in a sandboxed environment. This patch fixes that compilation error by deferring the call of `exiftool-run' to the first call of `exiftool-command'. Signed-off-by: Arun Isaac --- exiftool.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/exiftool.el b/exiftool.el index 7ba3d27..1b63f8e 100644 --- a/exiftool.el +++ b/exiftool.el @@ -2,12 +2,13 @@ ;; Elisp wrapper around ExifTool ;; Copyright (C) 2017, 2019 by Arun I +;; Copyright (C) 2026 by Lin Jian ;; ;; Author: Arun I ;; Version: 0.3.2 ;; Keywords: data ;; Homepage: https://git.systemreboot.net/exiftool.el -;; Package-Requires: ((emacs "25")) +;; Package-Requires: ((emacs "27.1")) ;; This file is part of exiftool.el. @@ -40,6 +41,7 @@ (require 'cl-lib) (require 'subr-x) +(require 'thunk) (require 'tq) (defvar exiftool-executable "exiftool" @@ -70,7 +72,7 @@ process." ;; Declare exiftool-command to pacify byte compiler (declare-function exiftool-command "exiftool.el" (&rest args)) -(let ((tq (tq-create (exiftool-run)))) +(thunk-let ((tq (tq-create (exiftool-run)))) (defun exiftool-command (&rest args) "Execute a command in the currently running exiftool process. -- cgit 1.4.1