diff options
Diffstat (limited to 'lisp/cedet/srecode/insert.el')
| -rw-r--r-- | lisp/cedet/srecode/insert.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/cedet/srecode/insert.el b/lisp/cedet/srecode/insert.el index 466efae3b9c..0d647bb56c5 100644 --- a/lisp/cedet/srecode/insert.el +++ b/lisp/cedet/srecode/insert.el | |||
| @@ -809,7 +809,7 @@ Arguments ESCAPE-START and ESCAPE-END are the current escape sequences in use." | |||
| 809 | (srecode-insert-report-error | 809 | (srecode-insert-report-error |
| 810 | dict | 810 | dict |
| 811 | "Only section dictionaries allowed for `%s'" | 811 | "Only section dictionaries allowed for `%s'" |
| 812 | (object-name-string sti))) | 812 | (eieio-object-name-string sti))) |
| 813 | 813 | ||
| 814 | ;; Output the code from the sub-template. | 814 | ;; Output the code from the sub-template. |
| 815 | (srecode-insert-method (slot-value sti slot) dict)) | 815 | (srecode-insert-method (slot-value sti slot) dict)) |
| @@ -866,7 +866,7 @@ Return the remains of INPUT." | |||
| 866 | (let* ((out (srecode-compile-split-code tag input STATE | 866 | (let* ((out (srecode-compile-split-code tag input STATE |
| 867 | (oref ins :object-name)))) | 867 | (oref ins :object-name)))) |
| 868 | (oset ins template (srecode-template | 868 | (oset ins template (srecode-template |
| 869 | (object-name-string ins) | 869 | (eieio-object-name-string ins) |
| 870 | :context nil | 870 | :context nil |
| 871 | :args nil | 871 | :args nil |
| 872 | :code (cdr out))) | 872 | :code (cdr out))) |