return or value for :go-pos-unsafe

jsk-ros-pkg · Dec 6, 2022 · 848bf8f · 848bf8f
1 parent 6bf7d3a
commit 848bf8f
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/pr2eus/robot-interface.l b/pr2eus/robot-interface.l
@@ -1697,8 +1697,8 @@ Return value is a list of interpolatingp for all controllers, so (null (some #'i
        (if wait (send move-base-trajectory-action :wait-for-result)))
      ))
   (:go-pos-unsafe (&rest args)
-    (send* self :go-pos-unsafe-no-wait args)
-    (send self :go-pos-unsafe-wait))
+    (or (send* self :go-pos-unsafe-no-wait args)
+        (send self :go-pos-unsafe-wait)))
   (:go-pos-unsafe-no-wait
    (x y &optional (d 0)) ;; [m] [m] [degree]
    (ros::ros-info "go-pos-unsafe (x y d) = (~A ~A ~A)" x y d)