Mercurial > emacs
comparison lisp/progmodes/cc-mode.el @ 41592:b89d0c514129
(c-submit-bug-report): Make sure that the arguments to `insert' are strings.
author | Sam Steingold <sds@gnu.org> |
---|---|
date | Mon, 26 Nov 2001 21:15:29 +0000 |
parents | 79039a33283a |
children | 36edcfb696f9 |
comparison
equal
deleted
inserted
replaced
41591:7c12657b7a8c | 41592:b89d0c514129 |
---|---|
383 (c-make-styles-buffer-local t)) | 383 (c-make-styles-buffer-local t)) |
384 (and c-file-style | 384 (and c-file-style |
385 (c-set-style c-file-style)) | 385 (c-set-style c-file-style)) |
386 (and c-file-offsets | 386 (and c-file-offsets |
387 (mapcar | 387 (mapcar |
388 (function | 388 (lambda (langentry) |
389 (lambda (langentry) | 389 (let ((langelem (car langentry)) |
390 (let ((langelem (car langentry)) | 390 (offset (cdr langentry))) |
391 (offset (cdr langentry))) | 391 (c-set-offset langelem offset))) |
392 (c-set-offset langelem offset) | |
393 ))) | |
394 c-file-offsets))) | 392 c-file-offsets))) |
395 | 393 |
396 (add-hook 'hack-local-variables-hook 'c-postprocess-file-styles) | 394 (add-hook 'hack-local-variables-hook 'c-postprocess-file-styles) |
397 | 395 |
398 | 396 |
891 (mapcar (lambda (var) (unless (boundp var) (delq var vars))) | 889 (mapcar (lambda (var) (unless (boundp var) (delq var vars))) |
892 '(signal-error-on-buffer-boundary | 890 '(signal-error-on-buffer-boundary |
893 filladapt-mode | 891 filladapt-mode |
894 defun-prompt-regexp)) | 892 defun-prompt-regexp)) |
895 vars) | 893 vars) |
896 (function | 894 (lambda () |
897 (lambda () | 895 (run-hooks 'c-prepare-bug-report-hooks) |
898 (run-hooks 'c-prepare-bug-report-hooks) | 896 (insert (format "Buffer Style: %s\n\nc-emacs-features: %s\n" |
899 (insert | 897 style c-features))))))) |
900 "Buffer Style: " style "\n\n" | |
901 (format "c-emacs-features: %s\n" c-features) | |
902 ))))))) | |
903 | 898 |
904 | 899 |
905 (cc-provide 'cc-mode) | 900 (cc-provide 'cc-mode) |
906 ;;; cc-mode.el ends here | 901 ;;; cc-mode.el ends here |