diff --git a/ide/packages/idedebugger/assemblerdlg.pp b/ide/packages/idedebugger/assemblerdlg.pp index 62d71348e0..3caa9f82f2 100644 --- a/ide/packages/idedebugger/assemblerdlg.pp +++ b/ide/packages/idedebugger/assemblerdlg.pp @@ -949,7 +949,7 @@ begin actCurrentInstr.Enabled := HasDisassembler and (FLocation <> 0); actGotoAddr.Enabled := HasDisassembler and (StrToQWordDef(EditGotoAddr.Text, 0) <> 0); actCopy.Enabled := HasDisassembler; - popCopyAddr.Enabled := GetLinMapEntryForLine(FSelectLine, dummy); + popCopyAddr.Enabled := HasDisassembler and GetLinMapEntryForLine(FSelectLine, dummy); actStepOverInstr.Enabled := HasDisassembler; actStepIntoInstr.Enabled := HasDisassembler; end;