Index: debugmanager.pas
===================================================================
--- debugmanager.pas	(revision 21991)
+++ debugmanager.pas	(working copy)
@@ -1548,8 +1548,7 @@
 
   if SrcLine < 1
   then begin
-    ViewDebugDialog(ddtAssembler);
-
+(*
     if FDialogs[ddtAssembler] = nil
     then begin
       // TODO: change into assemblerview failure
@@ -1558,23 +1557,25 @@
           HexStr(ALocation.Address, FDebugger.TargetWidth div 4), #13,
           ALocation.FuncName, #13, ALocation.SrcFile, #13#13#13, #13]),
         mtInformation, [mbOK],0);
-
-      // jump to the deepest stack frame with debugging info
-      i:=0;
-      while (i < FDebugger.CallStack.Count) do
-      begin
-        StackEntry := FDebugger.CallStack.Entries[i];
-        if StackEntry.Line > 0
-        then begin
-          SrcLine := StackEntry.Line;
-          SrcFile := StackEntry.Source;
-          StackEntry.Current := True;
-          Break;
-        end;
-        Inc(i);
+    end; *)
+    // jump to the deepest stack frame with debugging info
+    i:=0;
+    while (i < FDebugger.CallStack.Count) do
+    begin
+      StackEntry := FDebugger.CallStack.Entries[i];
+      if StackEntry.Line > 0
+      then begin
+        SrcLine := StackEntry.Line;
+        SrcFile := StackEntry.Source;
+        StackEntry.Current := True;
+        Break;
       end;
-      if SrcLine < 1 then Exit;
+      Inc(i);
     end;
+    if SrcLine < 1 then begin
+      ViewDebugDialog(ddtAssembler);
+      Exit;
+    end;
   end;
 
   if FDialogs[ddtAssembler] <> nil