FreeBSD Bugzilla – Attachment 190417 Details for
Bug 225747
net-p2p/transmission-remote-gui fails after update of lazarus to compile (update to 5.14.0)
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
Remember
[x]
|
Forgot Password
Login:
[x]
[patch]
svn-diff-transmission_remot_gui
svn-diff-transmission-remote-gui (text/plain), 14.08 KB, created by
Walter Schwarzenfeld
on 2018-02-08 07:49:00 UTC
(
hide
)
Description:
svn-diff-transmission_remot_gui
Filename:
MIME Type:
Creator:
Walter Schwarzenfeld
Created:
2018-02-08 07:49:00 UTC
Size:
14.08 KB
patch
obsolete
>Index: files/patch-addtorrent.pas >=================================================================== >--- files/patch-addtorrent.pas (nonexistent) >+++ files/patch-addtorrent.pas (working copy) >@@ -0,0 +1,11 @@ >+--- addtorrent.pas.orig 2018-02-08 05:35:22 UTC >++++ addtorrent.pas >+@@ -156,7 +156,7 @@ const >+ >+ implementation >+ >+-uses lclintf, lcltype, main, variants, Utils, rpc, lclproc; >++uses lclintf, lcltype, main, variants, Utils, rpc, lclproc, LazUtf8; >+ >+ const >+ roChecked = $030000; > >Property changes on: files/patch-addtorrent.pas >___________________________________________________________________ >Added: fbsd:nokeywords >## -0,0 +1 ## >+yes >\ No newline at end of property >Added: svn:eol-style >## -0,0 +1 ## >+native >\ No newline at end of property >Added: svn:mime-type >## -0,0 +1 ## >+text/plain >\ No newline at end of property >Index: files/patch-baseform.lfm >=================================================================== >--- files/patch-baseform.lfm (nonexistent) >+++ files/patch-baseform.lfm (working copy) >@@ -0,0 +1,17 @@ >+--- baseform.lfm.orig 2018-02-08 05:16:25 UTC >++++ baseform.lfm >+@@ -1,7 +1,7 @@ >+-object BaseForm: TBaseForm >+- Left = 234 >+- Height = 240 >+- Top = 132 >+- Width = 320 >+- LCLVersion = '1.0.15.0' >+-end >++object BaseForm: TBaseForm >++ Left = 234 >++ Height = 240 >++ Top = 132 >++ Width = 320 >++ LCLVersion = '1.4.5.0' >++end > >Property changes on: files/patch-baseform.lfm >___________________________________________________________________ >Added: fbsd:nokeywords >## -0,0 +1 ## >+yes >\ No newline at end of property >Added: svn:eol-style >## -0,0 +1 ## >+native >\ No newline at end of property >Added: svn:mime-type >## -0,0 +1 ## >+text/plain >\ No newline at end of property >Index: files/patch-baseform.pas >=================================================================== >--- files/patch-baseform.pas (nonexistent) >+++ files/patch-baseform.pas (working copy) >@@ -0,0 +1,66 @@ >+--- baseform.pas.orig 2018-02-08 06:43:04 UTC >++++ baseform.pas >+@@ -52,11 +52,11 @@ implementation >+ uses LCLType, ButtonPanel, VarGrid, ComCtrls, StdCtrls, ExtCtrls, lclversion; >+ >+ var >+- ScaleM, ScaleD: integer; >++ ScaleMul, ScaleDiv: integer; >+ >+ function ScaleInt(i: integer): integer; >+ begin >+- Result:=i*ScaleM div ScaleD; >++ Result:=i*ScaleMul div ScaleDiv; >+ end; >+ >+ type THackControl = class(TWinControl) end; >+@@ -117,8 +117,8 @@ begin >+ if C is TWinControl then >+ TWinControl(C).DisableAlign; >+ try >+- if ScaleM <> ScaleD then begin >+- ScaleConstraints(ScaleM, ScaleD); >++ if ScaleMul <> ScaleDiv then begin >++ ScaleConstraints(ScaleMul, ScaleDiv); >+ R := BaseBounds; >+ R.Left := ScaleInt(R.Left); >+ R.Top := ScaleInt(R.Top); >+@@ -237,26 +237,26 @@ var >+ i: integer; >+ tm: TLCLTextMetric; >+ begin >+- if ScaleD <> 0 then exit; >+- ScaleD:=11; >++ if ScaleDiv <> 0 then exit; >++ ScaleDiv:=11; >+ i:=Screen.SystemFont.Height; >+ if i = 0 then begin >+ if Canvas.GetTextMetrics(tm) then begin >+- ScaleM:=tm.Ascender; >+- if ScaleM < 11 then >+- ScaleM:=11; >++ ScaleMul:=tm.Ascender; >++ if ScaleMul < 11 then >++ ScaleMul:=11; >+ end >+ else begin >+- ScaleM:=Canvas.TextHeight('Wy'); >+- ScaleD:=13; >++ ScaleMul:=Canvas.TextHeight('Wy'); >++ ScaleDiv:=13; >+ end; >+- if ScaleM = 0 then >+- ScaleM:=ScaleD; >++ if ScaleMul = 0 then >++ ScaleMul:=ScaleDiv; >+ end >+ else >+- ScaleM:=Abs(i); >+- ScaleM:=ScaleM*IntfScale; >+- ScaleD:=ScaleD*100; >++ ScaleMul:=Abs(i); >++ ScaleMul:=ScaleMul*IntfScale; >++ ScaleDiv:=ScaleDiv*100; >+ end; >+ >+ initialization > >Property changes on: files/patch-baseform.pas >___________________________________________________________________ >Added: fbsd:nokeywords >## -0,0 +1 ## >+yes >\ No newline at end of property >Added: svn:eol-style >## -0,0 +1 ## >+native >\ No newline at end of property >Added: svn:mime-type >## -0,0 +1 ## >+text/plain >\ No newline at end of property >Index: files/patch-connoptions.lfm >=================================================================== >--- files/patch-connoptions.lfm (nonexistent) >+++ files/patch-connoptions.lfm (working copy) >@@ -0,0 +1,68 @@ >+--- connoptions.lfm.orig 2018-02-08 06:59:29 UTC >++++ connoptions.lfm >+@@ -33,33 +33,33 @@ inherited ConnOptionsForm: TConnOptionsF >+ ClientWidth = 505 >+ object txPassword: TLabel >+ Left = 24 >+- Height = 14 >++ Height = 13 >+ Top = 157 >+- Width = 51 >++ Width = 50 >+ Caption = 'Password:' >+ ParentColor = False >+ end >+ object txUserName: TLabel >+ Left = 24 >+- Height = 14 >++ Height = 13 >+ Top = 128 >+- Width = 56 >++ Width = 55 >+ Caption = 'User name:' >+ ParentColor = False >+ end >+ object txPort: TLabel >+ Left = 8 >+- Height = 14 >++ Height = 13 >+ Top = 76 >+- Width = 25 >++ Width = 24 >+ Caption = 'Port:' >+ ParentColor = False >+ end >+ object txHost: TLabel >+ Left = 8 >+- Height = 14 >++ Height = 13 >+ Top = 48 >+- Width = 66 >++ Width = 65 >+ Caption = 'Remote host:' >+ ParentColor = False >+ end >+@@ -137,9 +137,9 @@ inherited ConnOptionsForm: TConnOptionsF >+ end >+ object txRpcPath: TLabel >+ Left = 8 >+- Height = 14 >++ Height = 13 >+ Top = 212 >+- Width = 50 >++ Width = 49 >+ Caption = 'RPC path:' >+ ParentColor = False >+ end >+@@ -374,9 +374,9 @@ inherited ConnOptionsForm: TConnOptionsF >+ TabOrder = 0 >+ object txConName: TLabel >+ Left = 0 >+- Height = 14 >++ Height = 13 >+ Top = 4 >+- Width = 88 >++ Width = 87 >+ Caption = 'Connection name:' >+ ParentColor = False >+ end > >Property changes on: files/patch-connoptions.lfm >___________________________________________________________________ >Added: fbsd:nokeywords >## -0,0 +1 ## >+yes >\ No newline at end of property >Added: svn:eol-style >## -0,0 +1 ## >+native >\ No newline at end of property >Added: svn:mime-type >## -0,0 +1 ## >+text/plain >\ No newline at end of property >Index: files/patch-daemonoptions.pas >=================================================================== >--- files/patch-daemonoptions.pas (nonexistent) >+++ files/patch-daemonoptions.pas (working copy) >@@ -0,0 +1,11 @@ >+--- daemonoptions.pas.orig 2018-02-08 05:37:10 UTC >++++ daemonoptions.pas >+@@ -124,7 +124,7 @@ type >+ >+ implementation >+ >+-uses main, utils, fpjson; >++uses main, utils, fpjson, LazUtf8; >+ >+ { TDaemonOptionsForm } >+ > >Property changes on: files/patch-daemonoptions.pas >___________________________________________________________________ >Added: fbsd:nokeywords >## -0,0 +1 ## >+yes >\ No newline at end of property >Added: svn:eol-style >## -0,0 +1 ## >+native >\ No newline at end of property >Added: svn:mime-type >## -0,0 +1 ## >+text/plain >\ No newline at end of property >Index: files/patch-main.pas >=================================================================== >--- files/patch-main.pas (nonexistent) >+++ files/patch-main.pas (working copy) >@@ -0,0 +1,11 @@ >+--- main.pas.orig 2018-02-08 05:39:04 UTC >++++ main.pas >+@@ -786,7 +786,7 @@ uses >+ {$endif darwin} >+ synacode, ConnOptions, clipbrd, DateUtils, TorrProps, DaemonOptions, About, >+ ToolWin, download, ColSetup, types, AddLink, MoveTorrent, ssl_openssl_lib, AddTracker, lcltype, >+- Options, ButtonPanel, BEncode, synautil; >++ Options, ButtonPanel, BEncode, synautil, LazFileUtils, LazUtf8; >+ >+ const >+ TR_STATUS_CHECK_WAIT_1 = ( 1 shl 0 ); // Waiting in queue to check files > >Property changes on: files/patch-main.pas >___________________________________________________________________ >Added: fbsd:nokeywords >## -0,0 +1 ## >+yes >\ No newline at end of property >Added: svn:eol-style >## -0,0 +1 ## >+native >\ No newline at end of property >Added: svn:mime-type >## -0,0 +1 ## >+text/plain >\ No newline at end of property >Index: files/patch-options.lfm >=================================================================== >--- files/patch-options.lfm (nonexistent) >+++ files/patch-options.lfm (working copy) >@@ -0,0 +1,43 @@ >+--- options.lfm.orig 2018-02-08 07:03:23 UTC >++++ options.lfm >+@@ -74,7 +74,7 @@ inherited OptionsForm: TOptionsForm >+ TabOrder = 0 >+ object txSeconds: TLabel >+ Left = 438 >+- Height = 14 >++ Height = 13 >+ Top = 6 >+ Width = 40 >+ Anchors = [akTop, akRight] >+@@ -83,25 +83,25 @@ inherited OptionsForm: TOptionsForm >+ end >+ object txRefreshInterval: TLabel >+ Left = 10 >+- Height = 14 >++ Height = 13 >+ Top = 5 >+- Width = 105 >++ Width = 104 >+ Caption = 'Data refresh interval:' >+ ParentColor = False >+ end >+ object txRefreshIntervalMin: TLabel >+ Left = 10 >+- Height = 14 >++ Height = 13 >+ Top = 33 >+- Width = 182 >++ Width = 181 >+ Caption = 'Data refresh interval when minimized:' >+ ParentColor = False >+ end >+ object txSeconds2: TLabel >+ Left = 438 >+- Height = 14 >++ Height = 13 >+ Top = 34 >+- Width = 40 >++ Width = 39 >+ Anchors = [akTop, akRight] >+ Caption = 'seconds' >+ ParentColor = False > >Property changes on: files/patch-options.lfm >___________________________________________________________________ >Added: fbsd:nokeywords >## -0,0 +1 ## >+yes >\ No newline at end of property >Added: svn:eol-style >## -0,0 +1 ## >+native >\ No newline at end of property >Added: svn:mime-type >## -0,0 +1 ## >+text/plain >\ No newline at end of property >Index: files/patch-restranslator.pas >=================================================================== >--- files/patch-restranslator.pas (nonexistent) >+++ files/patch-restranslator.pas (working copy) >@@ -0,0 +1,38 @@ >+--- restranslator.pas.orig 2018-02-08 05:44:33 UTC >++++ restranslator.pas >+@@ -12,7 +12,7 @@ unit ResTranslator; >+ interface >+ >+ uses >+- Classes, StrUtils, SysUtils, FileUtil, LResources, TypInfo, LCLProc; >++ Classes, StrUtils, SysUtils, FileUtil, LazFileUtils, LResources, TypInfo, LCLProc; >+ >+ type >+ >+@@ -106,7 +106,7 @@ const >+ implementation >+ >+ uses >+- Forms, utils; >++ Forms, utils, LazUtf8; >+ >+ const >+ LineSeparator = '###################'; >+@@ -240,7 +240,7 @@ procedure MakeTranslationFile(Language: >+ var >+ lLang, sLang, s: string; >+ begin >+- LCLGetLanguageIDs(lLang, sLang); >++ LazGetLanguageIDs(lLang, sLang); >+ sLang:=AnsiLowerCase(sLang); >+ s:=ExtractFileNameOnly(ParamStrUtf8(0)); >+ if (sLang <> '') and not FileExistsUTF8(DefaultLangDir + s + '.' + sLang) then >+@@ -332,7 +332,7 @@ var >+ lLang, sLang, s: string; >+ i: integer; >+ begin >+- LCLGetLanguageIDs(lLang, sLang); >++ LazGetLanguageIDs(lLang, sLang); >+ lLang:=LowerCase(lLang); >+ sLang:=LowerCase(sLang); >+ {$ifdef windows} > >Property changes on: files/patch-restranslator.pas >___________________________________________________________________ >Added: fbsd:nokeywords >## -0,0 +1 ## >+yes >\ No newline at end of property >Added: svn:eol-style >## -0,0 +1 ## >+native >\ No newline at end of property >Added: svn:mime-type >## -0,0 +1 ## >+text/plain >\ No newline at end of property >Index: files/patch-transgui.lpi >=================================================================== >--- files/patch-transgui.lpi (nonexistent) >+++ files/patch-transgui.lpi (working copy) >@@ -0,0 +1,11 @@ >+--- transgui.lpi.orig 2018-02-08 05:42:55 UTC >++++ transgui.lpi >+@@ -1,7 +1,7 @@ >+ <?xml version="1.0"?> >+ <CONFIG> >+ <ProjectOptions> >+- <Version Value="9"/> >++ <Version Value="10"/> >+ <PathDelim Value="\"/> >+ <General> >+ <Flags> > >Property changes on: files/patch-transgui.lpi >___________________________________________________________________ >Added: fbsd:nokeywords >## -0,0 +1 ## >+yes >\ No newline at end of property >Added: svn:eol-style >## -0,0 +1 ## >+native >\ No newline at end of property >Added: svn:mime-type >## -0,0 +1 ## >+text/plain >\ No newline at end of property >Index: files/patch-utils.pas >=================================================================== >--- files/patch-utils.pas (nonexistent) >+++ files/patch-utils.pas (working copy) >@@ -0,0 +1,30 @@ >+--- utils.pas.orig 2018-02-08 05:29:54 UTC >++++ utils.pas >+@@ -100,8 +100,7 @@ uses >+ {$ifdef CALLSTACK} >+ lineinfo2, >+ {$endif CALLSTACK} >+- FileUtil, StdCtrls, Graphics; >+- >++ LazFileUtils, LazUtf8, StdCtrls, Graphics, fileutil; >+ {$ifdef windows} >+ function FileOpenUTF8(Const FileName : string; Mode : Integer) : THandle; >+ const >+@@ -170,7 +169,7 @@ var >+ s: widestring; >+ begin >+ if Win32Platform <> VER_PLATFORM_WIN32_NT then begin >+- Result:=FileUtil.ParamStrUTF8(Param); >++ Result:=LazUtf8.ParamStrUTF8(Param); >+ exit; >+ end; >+ >+@@ -235,7 +234,7 @@ end; >+ >+ function ParamStrUTF8(Param: Integer): utf8string; >+ begin >+- Result:=FileUtil.ParamStrUTF8(Param); >++ Result:=LazUtf8.ParamStrUTF8(Param); >+ end; >+ >+ function ParamCount: integer; > >Property changes on: files/patch-utils.pas >___________________________________________________________________ >Added: fbsd:nokeywords >## -0,0 +1 ## >+yes >\ No newline at end of property >Added: svn:eol-style >## -0,0 +1 ## >+native >\ No newline at end of property >Added: svn:mime-type >## -0,0 +1 ## >+text/plain >\ No newline at end of property >Index: files/patch-vargrid.pas >=================================================================== >--- files/patch-vargrid.pas (nonexistent) >+++ files/patch-vargrid.pas (working copy) >@@ -0,0 +1,11 @@ >+--- vargrid.pas.orig 2018-02-08 06:40:58 UTC >++++ vargrid.pas >+@@ -237,7 +237,7 @@ procedure Register; >+ >+ implementation >+ >+-uses Variants, Math, GraphType, lclintf, Themes, types, lclproc >++uses Variants, Math, GraphType, lclintf, Themes, types, lclproc, LazUtf8 >+ {$ifdef LCLcarbon} , carbonproc {$endif LCLcarbon}; >+ >+ const > >Property changes on: files/patch-vargrid.pas >___________________________________________________________________ >Added: fbsd:nokeywords >## -0,0 +1 ## >+yes >\ No newline at end of property >Added: svn:eol-style >## -0,0 +1 ## >+native >\ No newline at end of property >Added: svn:mime-type >## -0,0 +1 ## >+text/plain >\ No newline at end of property
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
Attachments on
bug 225747
:
190416
|
190417
|
191241
|
191242
|
193852
|
193854