No commit message

thetanz · Jun 28, 2023 · 7992136 · 7992136
2 parents 30bbc4a + 0c37951
commit 7992136
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 2 deletions.
diff --git a/DOCS/Changelog.md b/DOCS/Changelog.md
@@ -11,7 +11,8 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 ### Fixed
 <!---for any bug fixes--->
 - `The User does not exist. Identification fields and values: User Security ID='{00000000-0000-0000-0000-000000000001}'` fixed 
-- `Provider_FF_TSL(Table 70254346).ConnectionInfo operation exceeded time threshold (SQL query)` fixed #12
+- `Provider_FF_TSL(Table 70254346).ConnectionInfo operation exceeded time threshold (SQL query)` fixed [#12](https://github.com/thetanz/OpenFeature-al/issues/12)
+- Failed to copy environment [#17](https://github.com/thetanz/OpenFeature-al/issues/17)
 ### Added
 <!---for new features--->
 - 

diff --git a/MAIN/src/Features/FeatureMgt.Codeunit.al b/MAIN/src/Features/FeatureMgt.Codeunit.al
@@ -147,6 +147,7 @@ codeunit 70254347 "FeatureMgt_FF_TSL"
         FeatureIDs: List of [Code[50]];
         FeatureID: Code[50];
         TextBuilderVar: TextBuilder;
+        CurrentApplicationArea: Text;
         FeatureFunctionalityKeyLbl: Label '#FFTSL', Locked = true;
     begin
         if Session.GetExecutionContext() <> ExecutionContext::Normal then
@@ -164,7 +165,10 @@ codeunit 70254347 "FeatureMgt_FF_TSL"
                 else
                     LogProviderFailed(Provider.Code, 'GetEnabled');
             until Provider.Next() = 0;
-        ApplicationArea(GetApplicationAreaSetup() + ',' + TextBuilderVar.ToText() + FeatureFunctionalityKeyLbl);
+        CurrentApplicationArea := GetApplicationAreaSetup();
+        if CurrentApplicationArea <> '' then
+            CurrentApplicationArea += ',';
+        ApplicationArea(CurrentApplicationArea + TextBuilderVar.ToText() + FeatureFunctionalityKeyLbl);
     end;
 
     local procedure GetApplicationAreaSetup() ApplicationAreas: Text