all the rename methods now overloaded as just "rename"

Author: jacobwilliams

src/json_file_module.F90

@@ -880,7 +880,7 @@ subroutine json_file_rename(me,path,name,found)
     character(kind=CK,len=*),intent(in) :: name   !! the new name
     logical(LK),intent(out),optional    :: found  !! if the variable was found
 
-    call me%core%rename_by_path(me%p, path, name, found)
+    call me%core%rename(me%p, path, name, found)
 
     end subroutine json_file_rename
 !*****************************************************************************************

src/json_value_module.F90

@@ -386,17 +386,6 @@ module json_value_module
         procedure :: json_add_string_vec_by_path_path_ascii
 #endif
 
-        !>
-        !  Rename a variable, by specifying its path.
-        generic,public :: rename_by_path => MAYBEWRAP(json_rename_by_path)
-        procedure :: MAYBEWRAP(json_rename_by_path)
-#ifdef USE_UCS4
-        generic,public :: rename_by_path => json_rename_by_path_name_ascii,&
-                                            json_rename_by_path_path_ascii
-        procedure :: json_rename_by_path_name_ascii
-        procedure :: json_rename_by_path_path_ascii
-#endif
-
         !>
         !  Create a [[json_value]] linked list using the
         !  path to the variables. Optionally return a
@@ -636,8 +625,16 @@ module json_value_module
 
         !>
         !  Rename a [[json_value]] variable.
-        generic,public :: rename => MAYBEWRAP(json_value_rename)
+        generic,public :: rename => MAYBEWRAP(json_value_rename),&
+                                    MAYBEWRAP(json_rename_by_path)
         procedure :: MAYBEWRAP(json_value_rename)
+        procedure :: MAYBEWRAP(json_rename_by_path)
+#ifdef USE_UCS4
+        generic,public :: rename => json_rename_by_path_name_ascii,&
+                                    json_rename_by_path_path_ascii
+        procedure :: json_rename_by_path_name_ascii
+        procedure :: json_rename_by_path_path_ascii
+#endif
 
         !>
         !  get info about a [[json_value]]
@@ -5747,7 +5744,7 @@ subroutine wrap_json_rename_by_path(json, me, path, name, found)
     character(kind=CDK,len=*),intent(in)  :: name
     logical(LK),intent(out),optional      :: found
 
-    call json%rename_by_path(me,to_unicode(path),to_unicode(name),found)
+    call json%rename(me,to_unicode(path),to_unicode(name),found)
 
     end subroutine wrap_json_rename_by_path
 !*****************************************************************************************
@@ -5766,7 +5763,7 @@ subroutine json_rename_by_path_name_ascii(json, me, path, name, found)
     character(kind=CDK,len=*),intent(in)  :: name
     logical(LK),intent(out),optional      :: found
 
-    call json%rename_by_path(me,path,to_unicode(name),found)
+    call json%rename(me,path,to_unicode(name),found)
 
     end subroutine json_rename_by_path_name_ascii
 !*****************************************************************************************
@@ -5785,7 +5782,7 @@ subroutine json_rename_by_path_path_ascii(json, me, path, name, found)
     character(kind=CK,len=*),intent(in)   :: name
     logical(LK),intent(out),optional      :: found
 
-    call json%rename_by_path(me,to_unicode(path),name,found)
+    call json%rename(me,to_unicode(path),name,found)
 
     end subroutine json_rename_by_path_path_ascii
 !*****************************************************************************************

src/tests/jf_test_17.F90

@@ -73,7 +73,7 @@ subroutine test_17(error_cnt)
     ! rename by specifying the path:
     write(error_unit,'(A)') ''
     write(error_unit,'(A)') 'Rename: "iflag" to "flag"'
-    call json%rename_by_path(p,'iflag','flag')
+    call json%rename(p,'iflag','flag')
     call json%print(p,output_unit)
     if (json%failed()) then
         call json%print_error_message(error_unit)
@@ -89,10 +89,10 @@ subroutine test_17(error_cnt)
     nullify(q)
 
     ! unicode wrappers:
-    call json%rename_by_path(p,CK_'flag',  CK_'iflag')
-    call json%rename_by_path(p,CK_'iflag', CDK_'flag')
-    call json%rename_by_path(p,CDK_'flag', CK_'iflag')
-    call json%rename_by_path(p,CDK_'iflag',CDK_'flag')
+    call json%rename(p,CK_'flag',  CK_'iflag')
+    call json%rename(p,CK_'iflag', CDK_'flag')
+    call json%rename(p,CDK_'flag', CK_'iflag')
+    call json%rename(p,CDK_'iflag',CDK_'flag')
     if (json%failed()) then
         call json%print_error_message(error_unit)
         error_cnt = error_cnt + 1