diff options
| -rw-r--r-- | src/print.c | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/src/print.c b/src/print.c index e9a83d6d5dc..7440a82f6fd 100644 --- a/src/print.c +++ b/src/print.c | |||
| @@ -2501,14 +2501,14 @@ priorities. Values other than nil or t are also treated as | |||
| 2501 | doc: /* If non-nil, a function to call when printing unreadable objects. | 2501 | doc: /* If non-nil, a function to call when printing unreadable objects. |
| 2502 | By default, Emacs printing functions (like `prin1') print unreadable | 2502 | By default, Emacs printing functions (like `prin1') print unreadable |
| 2503 | objects as \"#<...>\", where \"...\" describes the object (for | 2503 | objects as \"#<...>\", where \"...\" describes the object (for |
| 2504 | instance, \"#<marker in no buffer>\"). If this variable is non-nil, | 2504 | instance, \"#<marker in no buffer>\"). |
| 2505 | it should be a function which will be called to print the object instead. | 2505 | |
| 2506 | 2506 | If non-nil, it should be a function that will be called with two | |
| 2507 | The function will be called with two arguments: the object to be printed, and | 2507 | arguments: the object to be printed, and the NOESCAPE flag (see |
| 2508 | the NOESCAPE flag (see `prin1-to-string'). If this function returns nil, the | 2508 | `prin1-to-string'). If this function returns nil, the object will be |
| 2509 | object will be printed as usual. If it returns a string, that string | 2509 | printed as usual. If it returns a string, that string will then be |
| 2510 | will then be printed. If the function returns anything else, the | 2510 | printed. If the function returns anything else, the object will not |
| 2511 | object will not be printed. */); | 2511 | be printed. */); |
| 2512 | Vprint_unreadable_function = Qnil; | 2512 | Vprint_unreadable_function = Qnil; |
| 2513 | DEFSYM (Qprint_unreadable_function, "print-unreadable-function"); | 2513 | DEFSYM (Qprint_unreadable_function, "print-unreadable-function"); |
| 2514 | } | 2514 | } |