Date: Tue, 29 Dec 2020 00:29:02 +0000 (UTC) From: Jose Alonso Cardenas Marquez <acm@FreeBSD.org> To: ports-committers@freebsd.org, svn-ports-all@freebsd.org, svn-ports-head@freebsd.org Subject: svn commit: r559535 - in head/net-p2p/transmission-remote-gui: . files Message-ID: <202012290029.0BT0T2AQ015821@repo.freebsd.org>
next in thread | raw e-mail | index | archive | help
Author: acm Date: Tue Dec 29 00:29:02 2020 New Revision: 559535 URL: https://svnweb.freebsd.org/changeset/ports/559535 Log: - Fix problem with new version of lazarus 2.0.10 (Error connect to the daemon) PR: 251839 Reported by: vgreg at ya.ru Obtained from: https://github.com/transmission-remote-gui/transgui/issues/1325 Added: head/net-p2p/transmission-remote-gui/files/patch-rpc.pas (contents, props changed) Modified: head/net-p2p/transmission-remote-gui/Makefile Modified: head/net-p2p/transmission-remote-gui/Makefile ============================================================================== --- head/net-p2p/transmission-remote-gui/Makefile Mon Dec 28 23:54:08 2020 (r559534) +++ head/net-p2p/transmission-remote-gui/Makefile Tue Dec 29 00:29:02 2020 (r559535) @@ -2,7 +2,7 @@ PORTNAME= transmission-remote-gui PORTVERSION= 5.18.0 -PORTREVISION= 3 +PORTREVISION= 4 DISTVERSIONPREFIX= v CATEGORIES= net-p2p PKGNAMESUFFIX= ${LAZARUS_PKGNAMESUFFIX} Added: head/net-p2p/transmission-remote-gui/files/patch-rpc.pas ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/net-p2p/transmission-remote-gui/files/patch-rpc.pas Tue Dec 29 00:29:02 2020 (r559535) @@ -0,0 +1,36 @@ +--- rpc.pas.orig 2020-12-27 23:03:22.112873000 -0500 ++++ rpc.pas 2020-12-27 23:05:37.172555000 -0500 +@@ -805,6 +805,7 @@ + req, args: TJSONObject; + _fields: TJSONArray; + i: integer; ++ sl: TStringList; + begin + Result:=nil; + req:=TJSONObject.Create; +@@ -813,13 +814,22 @@ + args:=TJSONObject.Create; + if TorrentId <> 0 then + args.Add('ids', TJSONArray.Create([TorrentId])); +- _fields:=TJSONArray.Create(Fields); +- for i:=Low(ExtraFields) to High(ExtraFields) do +- _fields.Add(ExtraFields[i]); ++ _fields:=TJSONArray.Create; ++ for i:=Low(Fields) to High(Fields) do ++ if (Fields[i].VType=vtAnsiString) then ++ sl.Add(String(Fields[i].VAnsiString)); ++ sl.AddStrings(ExtraFields); ++ sl.Sort; ++ for i:=sl.Count-2 downto 0 do ++ if (sl[i]=sl[i+1]) then ++ sl.Delete(i+1); ++ for i:=0 to sl.Count-1 do ++ _fields.Add(sl[i]); + args.Add('fields', _fields); + req.Add('arguments', args); + Result:=SendRequest(req); + finally ++ sl.Free; + req.Free; + end; + end;
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?202012290029.0BT0T2AQ015821>