From 9c3a384cf703cdd5d93425a466224167abaccf29 Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Wed, 16 Mar 2022 16:49:25 +0000
Subject: [PATCH] LazBarcodes: Fix Telepen max length error.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8212 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/lazbarcodes/src/lbc_telepen.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/lazbarcodes/src/lbc_telepen.pas b/components/lazbarcodes/src/lbc_telepen.pas
index 3422a883d..3aa03b4c8 100644
--- a/components/lazbarcodes/src/lbc_telepen.pas
+++ b/components/lazbarcodes/src/lbc_telepen.pas
@@ -75,7 +75,7 @@ var
   i: Integer;
 begin
   for i := 1 to Length(ASource) do
-    if ASource[i] > #126 then
+    if ASource[i] > #127 then       // wp: was #126, but this is against doc. 
     begin
       // Cannot encode extended ASCII
       ASymbol^.SetErrorText('Invalid characters in input data.');