new-line chars '\n' not printed?

[Rostislav Svoboda]

Hi,

can anybody explain please me why the '\n' char is not printed:


diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index e4890e0..421ec2f 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -296,7 +296,7 @@ suitable file is found, return nil."
           (if (and (eq function 'self-insert-command)
                    (vectorp (car-safe keys))
                    (consp (aref (car keys) 0)))
-              (princ "It is bound to many ordinary text characters.\n")
+              (princ "It is bound to many ===\n=== ordinary text
characters.\n")
             ;; Which non-control non-meta keys run this command?
             (dolist (key keys)
               (if (member (event-modifiers (aref key 0)) '(nil (shift)))


I.e. in the help buffer, after pressing C-h k <SPACE> I get:
It is bound to many === === ordinary text characters.

(self-insert-command N)

instead of:
It is bound to many ===
=== ordinary text characters.

(self-insert-command N)

However the '\n' at the end of the string is printed as expected. Huh???

Thx

Bost