diff options
Diffstat (limited to 'lisp/cedet/srecode/map.el')
| -rw-r--r-- | lisp/cedet/srecode/map.el | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/lisp/cedet/srecode/map.el b/lisp/cedet/srecode/map.el index af96037944b..3a833ca8bb3 100644 --- a/lisp/cedet/srecode/map.el +++ b/lisp/cedet/srecode/map.el | |||
| @@ -295,8 +295,14 @@ if that file is NEW, otherwise assume the mode has not changed." | |||
| 295 | 295 | ||
| 296 | ;; 2) Do we not have a current map? If so load. | 296 | ;; 2) Do we not have a current map? If so load. |
| 297 | (when (not srecode-current-map) | 297 | (when (not srecode-current-map) |
| 298 | (setq srecode-current-map | 298 | (condition-case nil |
| 299 | (eieio-persistent-read srecode-map-save-file)) | 299 | (setq srecode-current-map |
| 300 | (eieio-persistent-read srecode-map-save-file)) | ||
| 301 | (error | ||
| 302 | ;; There was an error loading the old map. Create a new one. | ||
| 303 | (setq srecode-current-map | ||
| 304 | (srecode-map "SRecode Map" | ||
| 305 | :file srecode-map-save-file)))) | ||
| 300 | ) | 306 | ) |
| 301 | 307 | ||
| 302 | ) | 308 | ) |