From 91336bc346dae1ffb3fc46b775cb7a86a42488bb Mon Sep 17 00:00:00 2001
From: Holden Rohrer <hr@hrhr.dev>
Date: Wed, 3 Jun 2020 01:21:19 -0400
Subject: realized that illegal characters should just be removed

---
 minimun.spec | 3 ++-
 orig/minimun | 4 ++--
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/minimun.spec b/minimun.spec
index 6539b50..8379477 100644
--- a/minimun.spec
+++ b/minimun.spec
@@ -1,7 +1,7 @@
 Summary: A perl cgi/pdfTeX script for doc generation
 Name: minimun
 Version: 1.0
-Release: 5
+Release: 7
 License: GPL, Unknown
 Source: https://hrhr.dev/src/minimun.tar.gz
 URL: https://git.hrhr.dev/minimun/about
@@ -14,6 +14,7 @@ Requires: texlive-pdftex
 Requires: texlive-amsfonts
 Requires: texlive-metafont
 Requires: texlive-mfware
+Requires: texlive-updmap-map
 Requires(pre): shadow-utils
 BuildRequires: make
 
diff --git a/orig/minimun b/orig/minimun
index 153bbb6..8e0cab1 100644
--- a/orig/minimun
+++ b/orig/minimun
@@ -18,7 +18,7 @@ foreach my $pair (@pairs) {
     my ($name, $val) = split(/=/, $pair);
     $val =~ tr/+/ /;
     $val =~ s/%(..)/pack("C", hex($1))/eg;
-    $val =~ s/([#%_\$^&{}\\])/\\$1/g;
+    $val =~ s/([#%_\$^&{}\\])//g;
     $FORM{$name} = $val;
 }
 
@@ -42,7 +42,7 @@ else{
 
 say $fh "\\bye";
 
-system ('/usr/bin/pdftex', $filename, '>/dev/null');
+`/usr/bin/pdftex "$filename"`;
 unlink "$filename.log";
 open(DOC, '<', "$filename.pdf") or do {
     print "Content-type: text/html\n";
-- 
cgit