Fix processing of hex data in RTF files.

Submitted by:	Morya Alexander <morya@apexnet.dp.ua>

2 files changed, 32 insertions, 0 deletions

diff --git a/textproc/rtfreader/Makefile b/textproc/rtfreader/Makefile
index e31ed93916ef..40081a851b23 100644
--- a/textproc/rtfreader/Makefile
+++ b/textproc/rtfreader/Makefile
@@ -7,6 +7,7 @@
 
 PORTNAME=	rtfreader
 PORTVERSION=	1.0
+PORTREVISION=	1
 CATEGORIES=	textproc
 MASTER_SITES=	http://www.fiction.net/blong/programs/
 DISTNAME=	ms-rtf
diff --git a/textproc/rtfreader/files/patch-rtfreader b/textproc/rtfreader/files/patch-rtfreader
new file mode 100644
index 000000000000..2390f5ef28ce
--- /dev/null
+++ b/textproc/rtfreader/files/patch-rtfreader
@@ -0,0 +1,31 @@
+*** rtfreadr.c	Thu Mar  6 00:06:26 1997
+--- rtfreadr.c.fixed	Wed Mar 24 15:51:37 2004
+***************
+*** 107,119 ****
+                          {
+                              if (ch < 'a' || ch > 'f')
+                                  return ecInvalidHex;
+!                             b += (char) ch - 'a';
+                          }
+                          else
+                          {
+                              if (ch < 'A' || ch > 'F')
+                                  return ecInvalidHex;
+!                             b += (char) ch - 'A';
+                          }
+                      }
+                      cNibble--;
+--- 107,119 ----
+                          {
+                              if (ch < 'a' || ch > 'f')
+                                  return ecInvalidHex;
+!                             b += (char) ch - 'a'+10;
+                          }
+                          else
+                          {
+                              if (ch < 'A' || ch > 'F')
+                                  return ecInvalidHex;
+!                             b += (char) ch - 'A'+10;
+                          }
+                      }
+                      cNibble--;