fixed missing variable output.

Author: jacobwilliams

src/json_file_module.F90

@@ -688,7 +688,7 @@ subroutine wrap_json_file_variable_info(me,path,found,var_type,n_children,name)
     integer(IK),intent(out),optional     :: n_children
     character(kind=CK,len=:),allocatable,intent(out),optional :: name !! variable name
 
-    call me%info(to_unicode(path),found,var_type,n_children)
+    call me%info(to_unicode(path),found,var_type,n_children,name)
 
     end subroutine wrap_json_file_variable_info
 !*****************************************************************************************