force panel open new window

This commit is contained in:
David Botton 2024-07-11 09:40:57 -04:00
parent ba25af0313
commit 9076566aae
6 changed files with 11 additions and 6 deletions

View file

@ -5,7 +5,7 @@
(cond ((and (> (length item) 5)
(equalp (subseq item (- (length item) 5)) ".clog"))
(if (or (eq method :tab)
(and (not (eq method :here)) *open-external*))
(and (not (eq method :here)) (or *open-external* *open-external-panels-always* )))
(on-new-builder-panel-ext panel :open-file item) ;; need ext for both
(on-new-builder-panel panel :open-file item)))
(t