Source

ecb / ecb-eshell.el

Diff from to

ecb-eshell.el

                                 (regexp-quote eshell-buffer-name)
                                 ".*")
                         t)))
-    (if (or ecb-compile-window-height
-            (numberp (car (get 'ecb-compile-window-height 'saved-value))))
+    (if ecb-compile-window-height
         (progn
           (add-to-list 'ecb-compilation-buffer-names-internal new-elem)
           (add-to-list 'ecb-compilation-major-modes-internal 'eshell-mode))
             (delete 'eshell-mode ecb-compilation-major-modes-internal))))
   
   ;; maybe we have to auto toggle our compile-window if temporally hidden
-  (when (and (numberp (car (get 'ecb-compile-window-height 'saved-value)))
-             (not (ecb-compile-window-live-p)))
+  (when (equal 'hidden (ecb-compile-window-state))
     (ecb-layout-debug-error "eshell around-advice: comp-win will be toggled.")
     (ecb-toggle-compile-window 1))