修正一个手误

designer/utslcodeeditor.tsf

@@ -3748,7 +3748,6 @@ type TEditer=class(TCustomcontrol) //
             begin
                 f := d["file"];
                 nf :=(f?(cmp.GetFileFullPath(f)):GetCurrentItem().OrigScriptPath);
-                //echo "\r\n",nf,"===",d["line"];
                 OpenAndGotoFileByName(nf,d["line"]);
             end
             cit := GetCurrentItem();

designer/utslsynmemo.tsf

@@ -1800,7 +1800,8 @@ type TTsfFileParser = class() //
             "getfullpath":
             begin
                 if not ifarray(FFilePaths) then return "";
-                return FFilePaths[lowercase(d["value"])+".tsf"];
+                r :=  FFilePaths[lowercase(d["value"])+".tsf"];
+                return r;
             end 
             "getprojecttsfs":
             begin
@@ -2210,8 +2211,8 @@ type TTsfFileParser = class() //
                 r := array();
                 rdd :="";
             end    
-            //r["fullpath"] := pfn;
+            r["fullpath"] := pfn;
-            r["name"] := fn;
+            //r["name"] := fn;
             if (aid := pos("@",fn)) then
             begin 
                 nn := fn[1:(aid-1)];