[groff] 52/115: [pdfpic]: Clean up better.

[G. Branden Robinson]

gbranden pushed a commit to branch branden-2022-06-01
in repository groff.

commit a1938d74b8fd3bb238dca2dc74df7f034d5d50f1
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Thu Apr 27 08:57:21 2023 -0500

    [pdfpic]: Clean up better.
    
    * tmac/pdfpic.tmac (PDFPIC): Call `pdfpic@cleanup` before returning when
      falling back to `PSPIC` for non-PDF documents.
    
    Also annotate naming convention.
---
 ChangeLog        | 7 +++++++
 tmac/pdfpic.tmac | 4 ++++
 2 files changed, 11 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index f618596f8..85ee6bdbc 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2023-04-27  G. Branden Robinson <g.branden.robinson@gmail.com>
+
+       [pdfpic]: Clean up better.
+
+       * tmac/pdfpic.tmac (PDFPIC): Call `pdfpic@cleanup` before
+       returning when falling back to `PSPIC` for non-PDF documents.
+
 2023-04-05  G. Branden Robinson <g.branden.robinson@gmail.com>
 
        * tmac/tty.tmac: Add angle bracket fallbacks.
diff --git a/tmac/pdfpic.tmac b/tmac/pdfpic.tmac
index f81b66e7f..08d04d277 100644
--- a/tmac/pdfpic.tmac
+++ b/tmac/pdfpic.tmac
@@ -9,6 +9,9 @@
 .\"
 .\" Requires the poppler-utils package (for pdfinfo(1) and pdftops(1)).
 .\" Requires running troff(1) in unsafe mode.
+.\"
+.\" Internal macro names start with `pdfpic@`; internal registers and
+.\" strings start with `pdfpic*`.
 .
 .do if d PDFPIC .nx
 .
@@ -132,6 +135,7 @@
 .    as pdfpic*pspic-args \\*[pdfpic*file-name-base].eps \\$*
 .
 .    PSPIC \\*[pdfpic*pspic-args]
+.    pdfpic@cleanup
 .    return
 .  \}
 .