Minor fix for Tao set element command. (#1130)

bmad-sim · Aug 8, 2024 · dc762ca · dc762ca
1 parent 8c48c7f
commit dc762ca
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tao/code/tao_set_mod.f90 b/tao/code/tao_set_mod.f90
@@ -3128,7 +3128,7 @@ subroutine tao_set_elements_cmd (ele_list, attribute, value, update)
 do i = 1, size(eles)
   u => s%u(eles(i)%id)
   call set_ele_attribute (eles(i)%ele, trim(attribute) // '=' // trim(val_str), err, .false., lord_set)
-  call pointer_to_attribute(eles(i)%ele, attribute, .true., a_ptr, err)
+  call pointer_to_attribute(eles(i)%ele, attribute, .true., a_ptr, err, .false.)
   call tao_set_flags_for_changed_attribute (u, eles(i)%ele%name, eles(i)%ele, a_ptr)
   if (.not. err) n_set = n_set + 1
 enddo