let pix_done = create_pix "done-item" (Filename.concat Cam_installation.pixmaps_dir "tdl-item-done.png") "done items"