summaryrefslogtreecommitdiff
path: root/lisp/cedet/semantic/analyze/debug.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2019-06-13 15:58:32 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2019-06-13 15:58:32 +0200
commite6e4a05087431c90b96636325ca7d2eac00c95c8 (patch)
tree7456e45b753d3dfb3a43574a1699a43f3be3002e /lisp/cedet/semantic/analyze/debug.el
parent67b261d2dad9b07f3fd62f873c892981af8a0742 (diff)
downloademacs-e6e4a05087431c90b96636325ca7d2eac00c95c8.tar.gz
Use cl-print-object instead of object-print throughout cedet
* lisp/cedet/semantic/db-find.el (semanticdb-find-log-activity): Ditto. * lisp/cedet/semantic/analyze/debug.el (semantic-analyzer-debug-insert-include-summary): Ditto. * lisp/cedet/semantic/bovine/c.el (semantic-c-describe-environment) (semantic-c-describe-environment) (semantic-c-describe-environment): Ditto. * lisp/cedet/semantic/decorate/include.el (semantic-decoration-fileless-include-describe): Ditto. (semantic-decoration-all-include-summary): Ditto. * lisp/cedet/srecode/insert.el (srecode-insert-variable-secondname-handler): Use cl-print-object instead of object-print.
Diffstat (limited to 'lisp/cedet/semantic/analyze/debug.el')
-rw-r--r--lisp/cedet/semantic/analyze/debug.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/cedet/semantic/analyze/debug.el b/lisp/cedet/semantic/analyze/debug.el
index d78d850723f..8ad9c22216f 100644
--- a/lisp/cedet/semantic/analyze/debug.el
+++ b/lisp/cedet/semantic/analyze/debug.el
@@ -408,16 +408,16 @@ or implementing a version specific to ")
(princ (substitute-command-keys
"\n\nThis file's project include search is handled by the EDE object:\n"))
(princ " Buffer Target: ")
- (princ (object-print edeobj))
+ (princ (cl-print-object edeobj))
(princ "\n")
(when (not (eq edeobj edeproj))
(princ " Buffer Project: ")
- (princ (object-print edeproj))
+ (princ (cl-print-object edeproj))
(princ "\n"))
(when edeproj
(let ((loc (ede-get-locator-object edeproj)))
(princ " Backup Locator: ")
- (princ (object-print loc))
+ (princ (cl-print-object loc))
(princ "\n")))
)