dolist?

[Lennart Borgman <lennart.borgman.073@student.lu.se>]

I am trying to use dolist in the function below. When I comment out the 
line marked below I only get the first det from detlst. What is wrong? 
Is dolist a no-no? Or is this a bug?


(defun instpack-check-pack-list()
  (message "Checking package list detail names...")
  (dolist (pack instpack-package-list)
    (let ((name (nth 0 pack))
      (detlst (nth 1 pack)))
      (message "  %s" name)
      (when detlst
    (dolist (det detlst)
          ;;(message "    det=%s" det) ;; <----------- I only get the 
first "det" if I comment out this...
      (let ((detname (car det)))
        (message (concat "  ... checking detail name " (symbol-name 
detname)))
        (unless (instpack-detail-valid detname)
          (error (concat "Detail name " detname " in package " name " is 
invalid" )))))))))