diff src/frame.c @ 91791:ad6ac471fdea

(Fdelete_frame): Call Fdelete_terminal.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Tue, 12 Feb 2008 04:03:17 +0000
parents a21ac0ad90f7
children 7327632ad432
line wrap: on
line diff
--- a/src/frame.c	Tue Feb 12 03:46:03 2008 +0000
+++ b/src/frame.c	Tue Feb 12 04:03:17 2008 +0000
@@ -1538,11 +1538,11 @@
     terminal->reference_count--;
     if (terminal->reference_count == 0)
       {
+	Lisp_Object tmp;
+	XSETTERMINAL (tmp, terminal);
+
         kb = NULL;
-        if (terminal->delete_terminal_hook)
-          (*terminal->delete_terminal_hook) (terminal);
-        else
-          delete_terminal (terminal);
+	Fdelete_terminal (tmp, NILP (force) ? Qt : force);
       }
 #ifdef MULTI_KBOARD
     else