let pix_high = create_pix "high-item"
    (Filename.concat Cam_installation.pixmaps_dir "tdl-item-high.png")
    "high priority items"