Hey,

I noticed that the extra window where the notes was taken is kept around
when taking it from agenda and pop-up-frames is t.

To reproduce:
Set these:
(setopt pop-up-frames t)
(setopt org-agenda-window-setup 'other-frame)

1. M-x org-agenda
2. z take note
3. submit or cancel
4. window opened for taking notes in target frame is still open.

Emacs  : GNU Emacs 31.0.50 (build 1, x86_64-suse-linux-gnu, GTK+ Version 
3.24.51, cairo version 1.18.4)
Package: Org mode version 9.8-pre (release_9.7.29-322-gccd0d1.dirty @ 
/home/bidar/.local/etc/emacs/lib/org/lisp/)

current state:
==============
(setq
 org-special-ctrl-a/e t
 org-agenda-clockreport-parameter-plist '(:link t :maxlevel 5 :fileskip0 t 
:stepskip0 t :compact nil :narrow 80)
 org-agenda-auto-exclude-function 'thao/org-auto-exclude-function
 org-refile-target-verify-function 'org-refile-verify-refile-target
 org-caldav-save-directory "/home/bidar/Dokumente/org"
 org-latex-pdf-process '("xelatex -shell-escape -interaction nonstopmode %f" 
"xelatex -shell-escape -interaction nonstopmode %f")
 org-yank-image-file-name-function 'org-yank-image-autogen-filename
 org-todo-state-tags-triggers '(("CANCELLED" ("CANCELLED" . t)) ("WAITING" 
("WAITING" . t)) ("HOLD" ("WAITING") ("HOLD" . t)) (done ("WAITING") ("HOLD"))
                                ("TODO" ("WAITING") ("CANCELLED") ("HOLD")) 
("NEXT" ("WAITING") ("CANCELLED") ("HOLD"))
                                ("DONE" ("WAITING") ("CANCELLED") ("HOLD")))
 org-persist-before-write-hook '(org-element--cache-persist-before-write)
 org-global-properties '(("Effort_ALL" . "0:15 0:30 0:45 1:00 2:00 3:00 4:00 
5:00 6:00 0:00") ("STYLE_ALL" . "habit"))
 org-expiry-handler-function 'org-toggle-archive-tag
 org-clock-persist t
 org-html-format-headline-function 'my-hack-org-html-format-headline-function
 org-reveal-start-hook '(org-decrypt-entry)
 org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-clock-out-hook '(bh/clock-out-maybe)
 org-pretty-entities t
 org-agenda-restriction-lock-highlight-subtree nil
 org-after-todo-state-change-hook '(org-checklist org-expiry-insert-created)
 org-html-html5-fancy t
 org-default-notes-file "/home/bidar/Dokumente/org/inbox.org"
 org-log-into-drawer t
 org-refile-allow-creating-parent-nodes 'confirm
 org-pomodoro-long-break-sound 
"/home/bidar/.local/etc/emacs/lib/org-pomodoro/resources/bell_multiple.wav"
 org-clock-out-remove-zero-time-clocks t
 org-babel-tangle-lang-exts '(("python" . "py") ("lua" . "lua") 
("clojurescript" . "cljs") ("clojure" . "clj") ("D" . "d") ("C++" . "cpp")
                              ("emacs-lisp" . "el") ("elisp" . "el") ("bibtex" 
. "bib"))
 org-clock-report-include-clocking-task t
 org-display-remote-inline-images 'cache
 org-clock-idle-time 35
 org-speed-command-hook '(org-speed-command-activate 
org-babel-speed-command-activate)
 org-caldav-exclude-tags '("Dayinfo")
 org-persist-after-read-hook '(org-element--cache-persist-after-read)
 org-fold-catch-invisible-edits 'show-and-error
 org-export-with-sub-superscripts nil
 org-confirm-elisp-link-function 'yes-or-no-p
 org-id-locations-file "/home/bidar/.local/etc/emacs/var/org/id-locations.el"
 org-clock-clocked-in-display nil
 org-agenda-finalize-hook '(org-agenda-to-appt org-modern-agenda)
 org-log-done 'note
 org-fast-tag-selection-single-key 'expert
 org-latex-format-headline-function 'org-latex-format-headline-default-function
 org-agenda-window-setup 'other-frame
 org-timestamp-rounding-minutes '(1 1)
 org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
 org-caldav-todo-percent-states '((0 "HOLD") (0 "WAITING") (0 "TODO") (1 
"NEXT") (2 "STARTED") (100 "CANCELLED") (100 "DONE"))
 org-blank-before-new-entry '((heading . t) (plain-list-item . auto))
 org-modern-mode-hook '(org-modern-mode-set-explicitly)
 org-mode-hook '(#[0
                   "\305\306    >\203\307\n\310\311#\210\307
\312\313#\210\307\314\315#\210\306      
>\203,\307\n\316\317#\210\307\n\320\321#\210\322        >\203>\307
\323\324#\210\307\325\324#\210\326  
>\203P\307\n\327\317#\210\307\n\330\321#\210\331        
>\203_\332\311\f\333BC\334#\210\335     >\203k\332\311\336\334#\210\337 
>\203w\332\311\340\334#\210\341\342\343\344#\207"
                   [org-mouse-context-menu-function
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
org-mouse-features
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
org-mouse-map
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
org-mode-map
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
org-outline-regexp-bol
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
org-mouse-context-menu
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
context-menu
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     org-defkey
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     [mouse-3]
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     nil
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     [mouse-3]
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
org-mouse-show-context-menu
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
[down-mouse-1]
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
org-mouse-down-mouse
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
[C-drag-mouse-1]
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
org-mouse-move-tree
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
[C-down-mouse-1]
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
org-mouse-move-tree-start
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     yank-link
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     [S-mouse-2]
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
org-mouse-yank-link
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
[drag-mouse-3]
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     move-tree
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
[drag-mouse-3]
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
[down-mouse-3]
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
activate-stars
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
font-lock-add-keywords
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     (0
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
             
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                            `(face org-link mouse-face highlight keymap 
,org-mouse-map)
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
             
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                            'prepend)
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     t
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
activate-bullets
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     (("^[      
]*\\([-+*]\\|[0-9]+[.)]\\) +"
                                                                                
                                                                                
                                                                                
                                                                                
                                                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
        
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
          (1
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                               `(face org-link keymap 
,org-mouse-map mouse-face highlight)
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                               'prepend)
                                                                                
                                                                                
                                                                                
                                                                                
                                                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
        
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
          )
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
         )
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     
activate-checkboxes
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     (("^[      
]*\\(?:[-+*]\\|[0-9]+[.)]\\)[   ]+\\(?:\\[@\\(?:start:\\)?[0-9]+\\][    
]*\\)?\\(\\[[- X]\\]\\)"
                                                                                
                                                                                
                                                                                
                                                                                
                                                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           (1
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                  `(face nil keymap ,org-mouse-map mouse-face 
highlight)
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                  prepend)
                                                                                
                                                                                
                                                                                
                                                                                
                                                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           )
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                      
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
          )
                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                     advice-add 
org-open-at-point :around org--mouse-open-at-point]
                   4]
                 er/add-org-mode-expansions org-edit-indirect-mode 
org-clock-load org-modern-mode org-appear-mode turn-on-org-cdlatex
                 #[0 "\301\302!\210\303\302\304\"\210\301\300!\210\305\211\207"
                   [completion-at-point-functions make-local-variable 
company-backends add-to-list (company-capf :with company-dabbrev)
                    (org-completion-symbols org-cap-filesystem)]
                   3]
                 #[nil ((add-hook 'change-major-mode-hook 'org-fold-show-all 
'append 'local))
                   (org--rds reftex-docstruct-symbol org-attach-method 
org--single-lines-list-is-paragraph org-element-greater-elements
                    org-agenda-restrict-end org-agenda-restrict-begin 
org-agenda-restrict org-clock-history org-agenda-current-date org-with-time
                    org-defdecode org-def org-read-date-inactive org-ans2 
org-ans1 org-columns-current-fmt-compiled org-clock-current-task
                    org-clock-effort org-agenda-skip-function 
org-agenda-skip-comment-trees org-agenda-archives-mode org-end-time-was-given
                    org-time-was-given org-log-note-extra org-log-note-purpose 
org-log-post-message org-last-inserted-timestamp org-last-changed-timestamp
                    org-entry-property-inherited-from org-state 
org-agenda-headline-snapshot-before-repeat org-agenda-buffer-name
                    org-agenda-start-on-weekday org-agenda-buffer-tmp-name 
org-log-note-marker org-mode-abbrev-table org-element-cache-persistent
                    org-element-cache-version buffer-face-mode-face 
org-tbl-menu org-org-menu org-struct-menu org-entities org-last-state
                    org-id-track-globally org-clock-start-time texmathp-why 
remember-data-file org-agenda-tags-todo-honor-ignore-options
                    calc-embedded-open-mode calc-embedded-open-formula 
calc-embedded-close-formula align-mode-rules-list org-emphasis-alist
                    org-emphasis-regexp-components 
org-export-registered-backends org-modules org-babel-load-languages 
org-id-overriding-file-name
                    org-indent-indentation-per-level 
org-element--timestamp-regexp org-element-cache-map-continue-from 
org-element-paragraph-separate
                    org-agenda-buffer-name org-inlinetask-min-level t)
                   ]
                 #[0 "\300\301\302\303\304$\207" [add-hook 
change-major-mode-hook org-babel-show-result-all append local] 5] 
org-babel-result-hide-spec
                 org-babel-hide-all-hashes #[0 "\301\211\207" 
[imenu-create-index-function org-imenu-get-tree] 2] jinx-mode
                 org-contacts-org-complete-setup)
 org-latex-default-packages-alist '(("AUTO" "inputenc" t ("pdflatex")) ("T1" 
"fontenc" t ("pdflatex")) ("" "graphicx" t nil) ("" "longtable" nil nil)
                                    ("" "wrapfig" nil nil) ("" "rotating" nil 
nil) ("normalem" "ulem" t nil) ("" "amsmath" t nil) ("" "textcomp" t nil)
                                    ("" "amssymb" t nil) ("" "capt-of" nil nil) 
("" "hyperref" nil nil))
 org-hide-emphasis-markers t
 org-texinfo-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-support-shift-select 1
 org-clock-out-when-done nil
 org-caldav-backup-file "/home/bidar/.local/etc/emacs/var/org/caldav/backup.org"
 org-link-elisp-confirm-function 'yes-or-no-p
 org-outline-path-complete-in-steps nil
 org-pomodoro-ticking-sound 
"/home/bidar/.local/etc/emacs/lib/org-pomodoro/resources/tick.wav"
 org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
 org-src-lang-modes '(("web" . web) ("conf" . conf) ("ini" . conf) ("inline-js" 
. javascript) ("C" . c) ("C++" . c++) ("asymptote" . asy)
                      ("beamer" . latex) ("calc" . fundamental) ("cpp" . c++) 
("ditaa" . artist) ("desktop" . conf-desktop) ("dot" . graphviz-dot)
                      ("elisp" . emacs-lisp) ("ocaml" . tuareg) ("screen" . 
shell-script) ("sqlite" . sql) ("toml" . conf-toml) ("shell" . sh)
                      ("ash" . sh) ("sh" . sh) ("bash" . sh) ("jsh" . sh) 
("bash2" . sh) ("dash" . sh) ("dtksh" . sh) ("ksh" . sh) ("es" . sh) ("rc" . sh)
                      ("itcsh" . sh) ("tcsh" . sh) ("jcsh" . sh) ("csh" . sh) 
("ksh88" . sh) ("oash" . sh) ("pdksh" . sh) ("mksh" . sh) ("posix" . sh)
                      ("wksh" . sh) ("wsh" . sh) ("zsh" . sh) ("rpm" . sh))
 org-agenda-skip-deadline-if-done t
 org-export-initial-scope 'subtree
 org-clock-persist-file "/home/bidar/.local/etc/emacs/var/org/clock-persist.el"
 org-cycle-hook '(org-modern--cycle t)
 org-persist-before-read-hook '(org-element--cache-persist-before-read)
 org-html-doctype "html5"
 org-use-sub-superscripts nil
 org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
 org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
 org-agenda-sorting-strategy '((agenda habit-down time-up effort-up 
category-keep) (todo category-up effort-up) (tags category-up effort-up)
                               (search category-up))
 org-id-link-to-org-use-id 'create-if-interactive-and-no-custom-id
 org-agenda-format-date #[257 "\300\301\302 \303\"\300\304!R\207" ["\n" 
make-string window-width 9472 org-agenda-format-date-aligned] 6 "\n\n(fn DATE)"]
 org-agenda-dim-blocked-tasks nil
 )

Reply via email to