Set difference in section 2.9.9

[ludanpr]

On page 131, the set difference operation,

2.9.9 Associating conditions with restarts

shouldn't it be

(let ((*print-escape* nil))
  (format t "~&~{;; ~W~%~}"
            (set-difference
              (compute-restarts)
              (compute-restarts *debugger-condition*))))

instead of

(let ((*print-escape* nil))
  (format t "~&~{;; ~W~%~}"
            (set-difference
              (compute-restarts *debugger-condition*)
              (compute-restarts))))

?