mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Fix previous object-print/cl-print-object changes

Browse source 
* lisp/cedet/srecode/insert.el
(srecode-insert-variable-secondname-handler):
* lisp/cedet/semantic/decorate/include.el
(semantic-decoration-fileless-include-describe):
(semantic-decoration-all-include-summary):
* lisp/cedet/semantic/db-find.el (semanticdb-find-log-activity):
* lisp/cedet/semantic/bovine/c.el
(semantic-c-describe-environment):
* lisp/cedet/semantic/analyze/debug.el
(semantic-analyzer-debug-insert-include-summary): Fix previous
object-print/cl-print-object changes that were nonsensical.
This commit is contained in:
Lars Ingebrigtsen 2019-06-14 16:57:35 +02:00
parent 18c83aedd9
commit 7f6b0c1ee9
5 changed files with 12 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/cedet/semantic/analyze/debug.el
View file

@ -409,16 +409,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 (cl-print-object edeobj))
(princ (cl-prin1-to-string edeobj))
(princ "\n")
(when (not (eq edeobj edeproj))
(princ " Buffer Project: ")
(princ (cl-print-object edeproj))
(princ (cl-prin1-to-string edeproj))
(princ "\n"))
(when edeproj
(let ((loc (ede-get-locator-object edeproj)))
(princ " Backup Locator: ")
(princ (cl-print-object loc))
(princ (cl-prin1-to-string loc))
(princ "\n")))
)