diff options
Diffstat (limited to 'lisp/cedet/srecode/map.el')
| -rw-r--r-- | lisp/cedet/srecode/map.el | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/lisp/cedet/srecode/map.el b/lisp/cedet/srecode/map.el index f885b49614d..1d419c93ba7 100644 --- a/lisp/cedet/srecode/map.el +++ b/lisp/cedet/srecode/map.el | |||
| @@ -270,7 +270,7 @@ if that file is NEW, otherwise assume the mode has not changed." | |||
| 270 | (if (not srecode-map-save-file) | 270 | (if (not srecode-map-save-file) |
| 271 | ;; 0) Create a MAP when in no save file mode. | 271 | ;; 0) Create a MAP when in no save file mode. |
| 272 | (when (not srecode-current-map) | 272 | (when (not srecode-current-map) |
| 273 | (setq srecode-current-map (srecode-map "SRecode Map")) | 273 | (setq srecode-current-map (srecode-map)) |
| 274 | (message "SRecode map created in non-save mode.") | 274 | (message "SRecode map created in non-save mode.") |
| 275 | ) | 275 | ) |
| 276 | 276 | ||
| @@ -290,8 +290,7 @@ if that file is NEW, otherwise assume the mode has not changed." | |||
| 290 | (error "Change your SRecode map file")))) | 290 | (error "Change your SRecode map file")))) |
| 291 | ;; Have a dir. Make the object. | 291 | ;; Have a dir. Make the object. |
| 292 | (setq srecode-current-map | 292 | (setq srecode-current-map |
| 293 | (srecode-map "SRecode Map" | 293 | (srecode-map :file srecode-map-save-file))) |
| 294 | :file srecode-map-save-file))) | ||
| 295 | 294 | ||
| 296 | ;; 2) Do we not have a current map? If so load. | 295 | ;; 2) Do we not have a current map? If so load. |
| 297 | (when (not srecode-current-map) | 296 | (when (not srecode-current-map) |
| @@ -301,8 +300,7 @@ if that file is NEW, otherwise assume the mode has not changed." | |||
| 301 | (error | 300 | (error |
| 302 | ;; There was an error loading the old map. Create a new one. | 301 | ;; There was an error loading the old map. Create a new one. |
| 303 | (setq srecode-current-map | 302 | (setq srecode-current-map |
| 304 | (srecode-map "SRecode Map" | 303 | (srecode-map :file srecode-map-save-file)))) |
| 305 | :file srecode-map-save-file)))) | ||
| 306 | ) | 304 | ) |
| 307 | 305 | ||
| 308 | ) | 306 | ) |