* sd/RexCat.sd: fixed a CloseCatalog call at the wrong position. This closes #8.

tboeckel · tboeckel · commit 5c5f6c10c9f7 · 2019-02-13T16:16:49.000+01:00
diff --git a/ChangeLog b/ChangeLog
@@ -2,6 +2,11 @@
 FlexCat Open Source - Changelog
 -------------------------------
 
+2019-02-13 Thore B�ckelmann <tboeckel@gmx.de>
+
+  * sd/RexCat.sd: fixed a CloseCatalog call at the wrong position. This closes
+    #8.
+
 2017-01-27 Thore B�ckelmann <tboeckel@gmx.de>
 
   * createcatsrc.c, scancd.c, scanct.c, scanpo.c: added some explicit
diff --git a/src/sd/RexCat.sd b/src/sd/RexCat.sd
@@ -31,11 +31,10 @@ gettlstext: PROCEDURE EXPOSE tlstext.
 
   cat = OPENCATALOG("%b.catalog","%l",%v)
   IF cat = 0 THEN DO
-    CALL CLOSECATALOG(cat)
     RETURN 0
   END
 
- tlstext.%i=GETCATALOGSTR(cat,%d,"")
+  tlstext.%i=GETCATALOGSTR(cat,%d,"")
+  CALL CLOSECATALOG(cat)
 
   RETURN 1
-

-Original file line number
+Diff line change
 FlexCat Open Source - Changelog
 -------------------------------
 +2019-02-13 Thore B�ckelmann <[email protected]>
++
 +  * sd/RexCat.sd: fixed a CloseCatalog call at the wrong position. This closes
 +    #8.
++
 -01-27 Thore B�ckelmann <[email protected]>
   * createcatsrc.c, scancd.c, scanct.c, scanpo.c: added some explicit