about summary refs log tree commit diff stats
path: root/WWW/Library/Implementation/HTAccess.c
diff options
context:
space:
mode:
authorThomas E. Dickey <dickey@invisible-island.net>2018-03-30 00:56:26 +0000
committerThomas E. Dickey <dickey@invisible-island.net>2018-03-30 00:56:26 +0000
commitdb24197ddd55e9578c129ec5b4e30cb2cc2a580b (patch)
treea209005b45cf95bcb5dc3ec61060238229dd9540 /WWW/Library/Implementation/HTAccess.c
parentac9f8d52a8715476153ade910dd81436bfdea2a7 (diff)
downloadlynx-snapshots-db24197ddd55e9578c129ec5b4e30cb2cc2a580b.tar.gz
snapshot of project "lynx", label v2-8-9dev_17e
Diffstat (limited to 'WWW/Library/Implementation/HTAccess.c')
-rw-r--r--WWW/Library/Implementation/HTAccess.c17
1 files changed, 12 insertions, 5 deletions
diff --git a/WWW/Library/Implementation/HTAccess.c b/WWW/Library/Implementation/HTAccess.c
index 4c2c1be5..0c731d1b 100644
--- a/WWW/Library/Implementation/HTAccess.c
+++ b/WWW/Library/Implementation/HTAccess.c
@@ -1,5 +1,5 @@
 /*
- * $LynxId: HTAccess.c,v 1.80 2016/11/24 15:29:50 tom Exp $
+ * $LynxId: HTAccess.c,v 1.81 2018/03/29 21:41:37 tom Exp $
  *
  *		Access Manager					HTAccess.c
  *		==============
@@ -1118,10 +1118,17 @@ static BOOL HTLoadDocument(const char *full_address,	/* may include #fragment */
  */
 BOOL HTLoadAbsolute(const DocAddress *docaddr)
 {
-    return HTLoadDocument(docaddr->address,
-			  HTAnchor_findAddress(docaddr),
-			  (HTOutputFormat ? HTOutputFormat : WWW_PRESENT),
-			  HTOutputStream);
+    BOOL result;
+    HTParentAnchor *anchor = HTAnchor_findAddress(docaddr);
+
+    result = HTLoadDocument(docaddr->address,
+			    anchor,
+			    (HTOutputFormat ? HTOutputFormat : WWW_PRESENT),
+			    HTOutputStream);
+    if (!result) {
+	HTAnchor_delete(anchor->parent);
+    }
+    return result;
 }
 
 #ifdef NOT_USED_CODE