   (interactive)
   (when rdebug-original-window-configuration
     (set-window-configuration rdebug-original-window-configuration)
+    (rdebug-set-window-configuration-state 'original)
     (message
      "Type `M-x rdebug-restore-windows RET' to see debugger windows.")))
 

  (run-mode-hooks 'rdebug-secondary-window-help-mode-hook))


(defun rdebug--setup-secondary-window-help-buffer (buf name)
  (rdebug-debug-enter "rdebug--setup-secondary-window-help-bufferr"
    (with-current-buffer buf
      (rdebug-secondary-window-help-mode)
      (set (make-local-variable 'gud-target-name) name)
      (insert "\

This is a rdebug secondary window, you can use it to display a

    ;; buffer process (nil). When the debugger processes is replaced
    ;; with another process we should not restore the window
    ;; configuration.
    (when (and (or (eq rdebug-restore-original-window-configuration t)
                   (and (eq rdebug-restore-original-window-configuration :many)
                        rdebug-many-windows))
               (or (null (get-buffer-process gud-comint-buffer))
                   (eq process (get-buffer-process gud-comint-buffer)))
               (eq rdebug-window-configuration-state 'debugger)
               (not (eq (process-status process) 'run)))
      (rdebug-set-window-configuration-state 'original)
      (rdebug-display-original-window-configuration))))

;; Fontification and keymaps for secondary buffers (breakpoints, stack)
