From be616d81bdaf8fd4ae61b0a145fb81bbdf467994 Mon Sep 17 00:00:00 2001
From: George Hazan <george.hazan@gmail.com>
Date: Fri, 26 Jun 2015 22:03:02 +0000
Subject: YEEHAW! CLISTMENUITEM::pszPopupName also died

git-svn-id: http://svn.miranda-ng.org/main/trunk@14404 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 plugins/mRadio/i_tray.inc | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'plugins/mRadio/i_tray.inc')

diff --git a/plugins/mRadio/i_tray.inc b/plugins/mRadio/i_tray.inc
index 4a32675903..0406bf311f 100644
--- a/plugins/mRadio/i_tray.inc
+++ b/plugins/mRadio/i_tray.inc
@@ -2,7 +2,7 @@
 var
   doTray:bool;
 var
-  trayradioparent:THANDLE;
+  trayradioparent:HGENMENU;
   trayprotoh:THANDLE;
   trayparent:THANDLE;
   traymute  :THANDLE;
@@ -91,7 +91,7 @@ begin
   // build menu from sorted list
   FillChar(mi,SizeOf(mi),0);
   mi.Flags :=CMIF_KEEPUNTRANSLATED or CMIF_UNICODE or CMIF_ROOTHANDLE;
-  mi.szPopupName:=TChar(trayparent);
+  mi.hParentMenu:=trayparent;
   pc:=StrCopyE(@buf,'mRadio/Choose');
   for i:=0 to trayStations.realCount-1 do
   begin
@@ -146,7 +146,7 @@ begin
     trayradioparent:=Menu_AddMainMenuItem(@mi);
 
   FillChar(mi, sizeof(mi), 0);
-  mi.szPopupName:=TChar(trayradioparent);
+  mi.hParentMenu:=trayradioparent;
 
   if PluginStatus=ID_STATUS_ONLINE then
   begin
-- 
cgit v1.2.3