(defun gnus-namazu/update-p (directory &optional force)
"Return the DIRECTORY when the index undef the DIRECTORY should be updated."
(setq directory (file-name-as-directory (expand-file-name directory)))
(defun gnus-namazu/update-p (directory &optional force)
"Return the DIRECTORY when the index undef the DIRECTORY should be updated."
(setq directory (file-name-as-directory (expand-file-name directory)))
(if gnus-namazu/update-process
(error-message "%s" "Can not run two update processes simultaneously")
(and (or force
(if gnus-namazu/update-process
(error-message "%s" "Can not run two update processes simultaneously")
(and (or force