Fix Tao show beam_init%distribution_type command. (#1199)

bmad-sim · Sep 17, 2024 · 9e99f06 · 9e99f06
1 parent b60cb64
commit 9e99f06
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tao/code/tao_command.f90 b/tao/code/tao_command.f90
@@ -768,7 +768,7 @@ subroutine tao_command (command_line, err_flag, err_is_fatal)
   case ('beam')
     call tao_set_beam_cmd (cmd_word(1), unquote(cmd_word(3)), branch_str)
   case ('beam_init')
-    call tao_set_beam_init_cmd (cmd_word(1), unquote(cmd_word(3)), branch_str)
+    call tao_set_beam_init_cmd (cmd_word(1), cmd_word(3), branch_str)
   case ('beam_start', 'particle_start')
     if (set_word == 'beam_start') call out_io (s_warn$, r_name, 'Note: "beam_start" is now named "particle_start".')
     call tao_set_particle_start_cmd (cmd_word(1), cmd_word(3))