mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-28 10:02:14 +00:00
Code Issues Projects Releases Packages Wiki Activity

UPD: Clean up

Browse source
This commit is contained in:
Alexander Koblov 2013-01-05 09:52:47 +00:00
commit 1ef21e6195
4 changed files with 10 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/dmhigh.pas
View file

@ -112,7 +112,7 @@ var
begin
SynHighlighterList:= TStringList.Create;
SynHighlighterHashList:= TStringHashList.Create(True);
{$PUSH}{$WARNINGS OFF}
{$PUSH}{$HINTS OFF}{$WARNINGS OFF}
SynPlainTextHighlighter:= TSynPlainTextHighlighter.Create(Self);
{$POP}
{$IF lcl_fullversion >= 093100}

12
src/fileviews/ubrieffileview.pas
View file

@ -5,9 +5,9 @@ unit uBriefFileView;
interface
uses
Classes, SysUtils, Controls, LMessages, Grids, Graphics, StdCtrls,
uDisplayFile, DCXmlConfig, uFileSorting, uFileProperty, uTypes,
uFileViewWithGrid, uFile, uFileViewHeader, uFileView, uFileSource;
Classes, SysUtils, Controls, LMessages, Grids, Graphics,
uDisplayFile, DCXmlConfig, uTypes, uFileViewWithGrid, uFile,
uFileSource;
type
@ -49,11 +49,9 @@ type
implementation
uses
LCLIntf, LCLType, LCLVersion, LCLProc, math,
uGlobs, uPixmapManager, uKeyboard,
uDCUtils, fMain,
LCLIntf, LCLType, LCLVersion, LCLProc, Math,
uGlobs, uPixmapManager, uKeyboard, fMain,
uFileSourceProperty,
uFileFunctions,
uOrderedFileView;
{ TBriefDrawGrid }

3
src/fileviews/ufileview.pas
View file

@ -536,7 +536,7 @@ type
implementation
uses
Clipbrd, Dialogs, LCLProc, LCLType, Forms, StrUtils, dmCommonData,
Clipbrd, Dialogs, LCLProc, LCLType, Forms, dmCommonData,
fMaskInputDlg, uMasks, DCOSUtils, uOSUtils, DCStrUtils, uDCUtils,
uDebug, uLng, uShowMsg, uFileSystemFileSource, uFileSourceUtil,
uFileViewNotebook, uSearchTemplate, uKeyboard, uFileFunctions,
@ -2892,7 +2892,6 @@ end;
procedure TFileView.EnableWatcher(Enable: Boolean);
var
sDrive, sWatchDirsExclude: String;
WatchFilter: TFSWatchFilter;
begin
if Enable then

8
src/fileviews/ufileviewwithgrid.pas
View file

@ -5,8 +5,8 @@ unit uFileViewWithGrid;
interface
uses
Classes, SysUtils, Controls, LMessages, Grids, Graphics, StdCtrls,
uDisplayFile, DCXmlConfig, uFileSorting, uFileProperty, uTypes,
Classes, SysUtils, Controls, Grids, Graphics, StdCtrls,
uDisplayFile, DCXmlConfig, uFileSorting, uFileProperty,
uFileViewWithMainCtrl, uFile, uFileViewHeader, uFileView, uFileSource;
type
@ -101,9 +101,7 @@ uses
LCLIntf, LCLType, LCLVersion, LCLProc, math,
uGlobs, uPixmapManager, uKeyboard,
uDCUtils, fMain,
uFileSourceProperty,
uFileFunctions,
uOrderedFileView;
uFileFunctions;
function FitFileName(const AFileName: UTF8String; ACanvas: TCanvas; AFile: TFile; ATargetWidth: Integer): UTF8String;
var