geom_point and geom_errorbarh adjusting with position dodge

Question

The data point and error bars are far away in the generated figure.

Here is the script

dat_combined %>%
  arrange(depth_cm) %>%
  ggplot(aes(x = mean_delta_13C, y = depth_cm)) +
  geom_errorbarh(aes(xmin = mean_delta_13C - sd_delta_13c, 
                     xmax = mean_delta_13C + sd_delta_13c, color = site),
                 height = 0.2, size = 0.5,  
                 position = position_dodge2(width = 0.3))   +
  geom_path(aes(group = interaction( Type, site)))+
  geom_point(aes(color = site, shape = Type),size = 2.5, 
             position = position_dodge2(width = 0.1)) +
  scale_color_manual(values = site_colors, labels = new_names) +
  labs(x = expression(delta^13*"C (‰)"), y = "Soil depth (cm)", color = "Ecosystem", shape = element_blank())+
  scale_x_reverse(position = "top") +
  scale_y_discrete(limits = rev(depths)) +  
  theme_pubr() 

Generated Figure (problem highlighted in green encircle)