337 |
(error "Can not find image directory %s" |
(error "Can not find image directory %s" |
338 |
mh-image-load-path)) |
mh-image-load-path)) |
339 |
((boundp 'image-load-path) |
((boundp 'image-load-path) |
340 |
(pushnew mh-image-load-path image-load-path)) |
(unless (member mh-image-load-path image-load-path) |
341 |
|
(push mh-image-load-path image-load-path))) |
342 |
((not (member mh-image-load-path load-path)) |
((not (member mh-image-load-path load-path)) |
343 |
(push mh-image-load-path load-path)))) |
(push mh-image-load-path load-path)))) |
344 |
(setq mh-image-load-path-called-flag t))) |
(setq mh-image-load-path-called-flag t))) |