diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/manual/cedet/srecode-tests.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/manual/cedet/srecode-tests.el b/test/manual/cedet/srecode-tests.el index b849d7a6039..63d10973e51 100644 --- a/test/manual/cedet/srecode-tests.el +++ b/test/manual/cedet/srecode-tests.el | |||
| @@ -68,13 +68,13 @@ It is filled with some text." | |||
| 68 | (when (or (not (slot-boundp f 'overlay)) (not (oref f overlay))) | 68 | (when (or (not (slot-boundp f 'overlay)) (not (oref f overlay))) |
| 69 | (error "Field test: Overlay info not created for field")) | 69 | (error "Field test: Overlay info not created for field")) |
| 70 | 70 | ||
| 71 | (when (and (overlay-p (oref f overlay)) | 71 | (when (and (overlayp (oref f overlay)) |
| 72 | (not (overlay-get (oref f overlay) 'srecode-init-only))) | 72 | (not (overlay-get (oref f overlay) 'srecode-init-only))) |
| 73 | (error "Field creation overlay is not tagged w/ init flag")) | 73 | (error "Field creation overlay is not tagged w/ init flag")) |
| 74 | 74 | ||
| 75 | (srecode-overlaid-activate f) | 75 | (srecode-overlaid-activate f) |
| 76 | 76 | ||
| 77 | (when (or (not (overlay-p (oref f overlay))) | 77 | (when (or (not (overlayp (oref f overlay))) |
| 78 | (overlay-get (oref f overlay) 'srecode-init-only)) | 78 | (overlay-get (oref f overlay) 'srecode-init-only)) |
| 79 | (error "New field overlay not created during activation")) | 79 | (error "New field overlay not created during activation")) |
| 80 | 80 | ||