On 21/06/2022 19:03, Hugo Heagren wrote:
+(defmacro test-ol-with-link-parameters-as (type parameters &rest body)
[...]
+ `(progn
+ (setq orig-parameters org-link-parameters)
I can easily miss something, but wouldn't it be enough to use let-binding
`(let ((org-link-parameters org-link-parameters))
,@body)
Otherwise it is better to use something like `condition-case' to restore
original state even when some error is signaled.
+ (org-link-set-parameters ,type ,@parameters)
+ (let ((rtn (progn ,@body)))
+ (setq org-link-parameters orig-parameters)
+ rtn)))