shop-planner / shop3

SHOP3 Git repository
https://shop-planner.github.io
144 stars 14 forks source link

hand-steer in find-plans doesn't work with some task lists #106

Closed ko56 closed 2 years ago

ko56 commented 2 years ago

If the the atoms in the problem file's task list contain :task, e.g.

((:task add-to-KB) (:task create-service JF))

then the :hand-steer in (find-plans 'demo-net :hand-steer t) has no effect. If the :task is removed, things work as expected.

rpgoldman commented 2 years ago

Will you please post a MWE? If you do, I will have a look as soon as I can manage

ko56 commented 2 years ago

In the process of constructing a small example, I restarted SLIME, and, magically, the problem disappeared! So, false alarm, sorry. Only one suggestion: in planning-engine/search.lisp, in the line

(let ((input (y-or-n-p "~&Only one candidate ~:[~;immediate ~] task for expansion:~%~T~S~%Proceed?~%"

I would remove the last ~% so the Proceed? (y or n) is all printed on one line.