From e482b58d590299c58284aaea9b45e206fced7bdf Mon Sep 17 00:00:00 2001
From: oehhar <harald.oehlmann@elmicron.de>
Date: Wed, 21 Sep 2016 08:44:53 +0000
Subject: pack: shrink frame when last child is unpacked. Ticket [d6b95ce4]

---
 generic/tkPack.c | 3 +++
 1 file changed, 3 insertions(+)
 mode change 100644 => 100755 generic/tkPack.c

diff --git a/generic/tkPack.c b/generic/tkPack.c
old mode 100644
new mode 100755
index 88a4b2d..3fa5c5e
--- a/generic/tkPack.c
+++ b/generic/tkPack.c
@@ -1363,6 +1363,9 @@ Unlink(
      */
 
     if (masterPtr->slavePtr == NULL && masterPtr->flags & ALLOCED_MASTER) {
+	if (!(masterPtr->flags & DONT_PROPAGATE)) {
+	    Tk_GeometryRequest(masterPtr->tkwin, 0, 0);
+	}
 	TkFreeGeometryMaster(masterPtr->tkwin, "pack");
 	masterPtr->flags &= ~ALLOCED_MASTER;
     }
-- 
cgit v0.12