[8025] parsetexi avoid adding extra key by mistake

[gavinsmith0123]

Revision: 8025
          http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=8025
Author:   gavin
Date:     2018-08-09 08:31:18 -0400 (Thu, 09 Aug 2018)
Log Message:
-----------
parsetexi avoid adding extra key by mistake

Modified Paths:
--------------
    trunk/tp/parsetexi/Parsetexi.pm

Modified: trunk/tp/parsetexi/Parsetexi.pm
===================================================================
--- trunk/tp/parsetexi/Parsetexi.pm     2018-08-09 12:19:45 UTC (rev 8024)
+++ trunk/tp/parsetexi/Parsetexi.pm     2018-08-09 12:31:18 UTC (rev 8025)
@@ -1,4 +1,4 @@
-# Copyright 2014, 2015, 2016, 2017 Free Software Foundation, Inc.
+# Copyright 2014, 2015, 2016, 2017, 2018 Free Software Foundation, Inc.
 #
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -490,7 +490,8 @@
           }
         }
       }
-      if (defined $target->{'extra'}->{'node_content'}) {
+      if (defined $target->{'extra'}
+            and defined $target->{'extra'}->{'node_content'}) {
         my $normalized = 
Texinfo::Convert::NodeNameNormalization::normalize_node({'contents' => 
$target->{'extra'}->{'node_content'}});
 
         if ($normalized !~ /[^-]/) {