From e23faedabac3c8970741cab14ae3ab3c47727309 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Fri, 20 Mar 2015 03:33:41 +0100
Subject: [PATCH] fix, possible AV if str is empty

---
 src/ce_dmdwrap.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/ce_dmdwrap.pas b/src/ce_dmdwrap.pas
index 1ce0a551..e864e4e2 100644
--- a/src/ce_dmdwrap.pas
+++ b/src/ce_dmdwrap.pas
@@ -968,7 +968,8 @@ var
 begin
   for str1 in fCustom do if str1 <> '' then
   begin
-    if str1[1] = ';' then
+    if length(str) > 0 then
+      if str1[1] = ';' then
         continue;
     if length(str1) > 1 then
       if str1[1..2] = '//' then