summaryrefslogtreecommitdiff
path: root/UToolTips.pas
diff options
context:
space:
mode:
Diffstat (limited to 'UToolTips.pas')
-rw-r--r--UToolTips.pas19
1 files changed, 8 insertions, 11 deletions
diff --git a/UToolTips.pas b/UToolTips.pas
index 96a0ec2..a9ed9fb 100644
--- a/UToolTips.pas
+++ b/UToolTips.pas
@@ -255,18 +255,15 @@ begin
AListView := FMain.RightListView;
end;
- if not Application.GTKVersion_2_0_5_Up then gtk_tree_model_get(gtk_tree_view_get_model(data_panel), @iter, 0, @Data, -1)
- else begin
- TreePath := gtk_tree_path_new_from_string(PChar(IntToStr(gtk_tree_path_get_indices(data_row)^)));
- if not Assigned(TreePath) then Exit;
- AListView.ConvertPathToChild(TreePath);
- if (TreePath = nil) or (gtk_tree_path_get_indices(TreePath)^ > DataList.Count - 1) then begin
- FileListTipsHide;
- Exit;
- end;
- Data := DataList[gtk_tree_path_get_indices(TreePath)^];
- gtk_tree_path_free(TreePath);
+ TreePath := gtk_tree_path_new_from_string(PChar(IntToStr(gtk_tree_path_get_indices(data_row)^)));
+ if not Assigned(TreePath) then Exit;
+ AListView.ConvertPathToChild(TreePath);
+ if (TreePath = nil) or (gtk_tree_path_get_indices(TreePath)^ > DataList.Count - 1) then begin
+ FileListTipsHide;
+ Exit;
end;
+ Data := DataList[gtk_tree_path_get_indices(TreePath)^];
+ gtk_tree_path_free(TreePath);
if (Data = nil) or Data^.UpDir then begin
FileListTipsHide;
Exit;