@@ -87,7 +87,7 @@ local asmlib = trackasmlib; if(not asmlib) then -- Module present
8787---- -------- CONFIGURE ASMLIB ------------
8888
8989asmlib .InitBase (" track" ," assembly" )
90- asmlib .SetOpVar (" TOOL_VERSION" ," 9.779 " )
90+ asmlib .SetOpVar (" TOOL_VERSION" ," 9.780 " )
9191
9292---- -------- CONFIGURE GLOBAL INIT OPVARS ------------
9393
@@ -929,19 +929,6 @@ if(CLIENT) then
929929 function () asmlib .SetListViewRowClipboard (pnSelf ) end ):SetImage (asmlib .ToIcon (sI .. " cprw" ))
930930 pIn :AddOption (languageGetPhrase (sT .. " cpth" ),
931931 function () SetClipboardText (sDsv ) end ):SetImage (asmlib .ToIcon (sI .. " cpth" ))
932- -- Panel data line manipulation for import/export
933- local pIn , pOp = pnMenu :AddSubMenu (languageGetPhrase (sT .. " li" ))
934- if (not IsValid (pIn )) then pnFrame :Close ()
935- asmlib .LogInstance (" Internals menu invalid" ,sLog .. " .ListView" ); return nil end
936- if (not IsValid (pOp )) then pnFrame :Close ()
937- asmlib .LogInstance (" Internals opts invalid" ,sLog .. " .ListView" ); return nil end
938- pOp :SetIcon (asmlib .ToIcon (sI .. " li" ))
939- pIn :AddOption (languageGetPhrase (sT .. " licg" ),
940- function () tpText :Scan (pnLine , true ) end ):SetImage (asmlib .ToIcon (sI .. " licg" ))
941- pIn :AddOption (languageGetPhrase (sT .. " licr" ),
942- function () tpText :Scan (pnLine ) end ):SetImage (asmlib .ToIcon (sI .. " licr" ))
943- pIn :AddOption (languageGetPhrase (sT .. " lirm" ),
944- function () pnSelf :RemoveLine (nIndex ) end ):SetImage (asmlib .ToIcon (sI .. " lirm" ))
945932 -- Move current line around
946933 local pIn , pOp = pnMenu :AddSubMenu (languageGetPhrase (sT .. " mv" ))
947934 if (not IsValid (pIn )) then pnFrame :Close ()
@@ -969,6 +956,19 @@ if(CLIENT) then
969956 if (nIndex >= nT ) then return end
970957 tpText :Swap (pnLine , pnSelf :GetLine (nT ))
971958 end ):SetImage (asmlib .ToIcon (sI .. " mvbt" ))
959+ -- Panel data line manipulation for import/export
960+ local pIn , pOp = pnMenu :AddSubMenu (languageGetPhrase (sT .. " li" ))
961+ if (not IsValid (pIn )) then pnFrame :Close ()
962+ asmlib .LogInstance (" Internals menu invalid" ,sLog .. " .ListView" ); return nil end
963+ if (not IsValid (pOp )) then pnFrame :Close ()
964+ asmlib .LogInstance (" Internals opts invalid" ,sLog .. " .ListView" ); return nil end
965+ pOp :SetIcon (asmlib .ToIcon (sI .. " li" ))
966+ pIn :AddOption (languageGetPhrase (sT .. " licg" ),
967+ function () tpText :Scan (pnLine , true ) end ):SetImage (asmlib .ToIcon (sI .. " licg" ))
968+ pIn :AddOption (languageGetPhrase (sT .. " licr" ),
969+ function () tpText :Scan (pnLine ) end ):SetImage (asmlib .ToIcon (sI .. " licr" ))
970+ pIn :AddOption (languageGetPhrase (sT .. " lirm" ),
971+ function () pnSelf :RemoveLine (nIndex ) end ):SetImage (asmlib .ToIcon (sI .. " lirm" ))
972972 -- Populate the sub-menu with all table nicknames
973973 local iD , pIn , pOp = 1 , nil , nil
974974 local makTab = asmlib .GetBuilderID (iD )
@@ -1002,8 +1002,9 @@ if(CLIENT) then
10021002 function () SetClipboardText (tostring (fileSize (sFile , " DATA" )).. " B" ) end ):SetImage (asmlib .ToIcon (sI .. " stsz" ))
10031003 pTb :AddOption (languageGetPhrase (sT .. " sted" ),
10041004 function () -- Edit the database contents using the Luapad addon
1005- if (not luapad ) then return end -- Luapad is not installed do nothing
1006- asmlib .LogInstance (" Modify " .. asmlib .GetReport (sFile ), sLog .. " .ListView" )
1005+ if (not luapad ) then -- Luapad is not installed then do nothing
1006+ asmlib .LogInstance (" Skipped " .. asmlib .GetReport (sFile ), sLog .. " .ListView" ); return end
1007+ asmlib .LogInstance (" Modify " .. asmlib .GetReport (sFile ), sLog .. " .ListView" )
10071008 if (luapad .Frame ) then luapad .Frame :SetVisible (true ); luapad .Frame :Center () else luapad .Toggle () end
10081009 luapad .AddTab (" [" .. sP .. " ][" .. defTab .Nick .. " ]" , fileRead (sFile , " DATA" ), sDsv );
10091010 if (defTab .Nick == " PIECES" ) then -- Load the category provider for this DSV
0 commit comments