Only add search parameters for viewer

Implemented in a dirty way: if the command contains "view" then add the search parameters.
This commit is contained in:
Lars The 2025-04-09 22:07:32 +02:00 committed by GitHub
commit 5166b7b27b
No known key found for this signature in database
GPG key ID: B5690EEEBB952194

View file

@ -1005,7 +1005,7 @@ var
addedCmdExternal : String = '';
begin
Result := False;
if True then
if Pos('view', LowerCase(sCmd)) > 0 then
begin
FText:= Copy(FText, 1, Length(FText) - 2) + '"' + glsSearchHistory[0] + '"';
Options:= TTextSearchOptions(UInt32(UIntPtr(glsSearchHistory.Objects[0])));