Mercurial > emacs
comparison lisp/emacs-lisp/shadow.el @ 14348:a5a7213294d9
(list-load-path-shadows): Pass proper format string to message.
(list-load-path-shadows): Delete format call inside message.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Thu, 25 Jan 1996 01:16:14 +0000 |
| parents | 83f275dcd93a |
| children | 73a325c414a5 |
comparison
equal
deleted
inserted
replaced
| 14347:f5f5fa38faa7 | 14348:a5a7213294d9 |
|---|---|
| 191 (insert (format "%s shadows %s\n" (car shadows) (car (cdr shadows)))) | 191 (insert (format "%s shadows %s\n" (car shadows) (car (cdr shadows)))) |
| 192 (setq shadows (cdr (cdr shadows)))) | 192 (setq shadows (cdr (cdr shadows)))) |
| 193 (insert msg "\n"))) | 193 (insert msg "\n"))) |
| 194 ;; We are non-interactive, print shadows via message. | 194 ;; We are non-interactive, print shadows via message. |
| 195 (while shadows | 195 (while shadows |
| 196 (message (format "%s shadows %s" (car shadows) (car (cdr shadows)))) | 196 (message "%s shadows %s" (car shadows) (car (cdr shadows))) |
| 197 (setq shadows (cdr (cdr shadows)))) | 197 (setq shadows (cdr (cdr shadows)))) |
| 198 (message msg)))) | 198 (message "%s" msg)))) |
| 199 | 199 |
| 200 (provide 'shadow) | 200 (provide 'shadow) |
| 201 | 201 |
| 202 ;;; shadow.el ends here | 202 ;;; shadow.el ends here |