From: NeilBrown <neil@brown.name>
Date: Thu, 26 Nov 2015 07:00:06 +0000 (+1100)
Subject: emacs_kill_doc - no pointp
X-Git-Tag: lca2016~186
X-Git-Url: http://git.neil.brown.name/?a=commitdiff_plain;h=f4de5bd18c28dad0887883cbf83120c932f0c9c0;p=edlib.git

emacs_kill_doc - no pointp

Signed-off-by: NeilBrown <neil@brown.name>
---

diff --git a/mode-emacs.c b/mode-emacs.c
index 3178d5d9..3e7481dd 100644
--- a/mode-emacs.c
+++ b/mode-emacs.c
@@ -538,11 +538,11 @@ DEF_CMD(emacs_num)
 
 DEF_CMD(emacs_kill_doc)
 {
-	struct doc *d;
-	if (!ci->pointp)
-		return 0;
-	d = (*ci->pointp)->doc;
-	doc_destroy(d);
+	struct pane *p = doc_get_pane(ci->home);
+	struct doc *d = p ? p->data : NULL;
+
+	if (d)
+		doc_destroy(d);
 	return 1;
 }