From 6b33eb408cd8a54d09002809c3ee693b6fe18f08 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 29 Jul 1993 02:31:06 +0000 Subject: [PATCH] (Man-filter-list): Insert \n newlines in awk script. --- lisp/man.el | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/lisp/man.el b/lisp/man.el index f01265cab45..69a9fd8390f 100644 --- a/lisp/man.el +++ b/lisp/man.el @@ -147,12 +147,12 @@ the associated section number.") "-e '/^Sun Release [0-9].*[0-9]$/d'" "-e '/^\\n$/D'" )) - ("awk '" - ("BEGIN { blankline=0; anonblank=0; }" - "/^$/ { if (anonblank==0) next; }" - "{ anonblank=1; }" - "/^$/ { blankline++; next; }" - "{ if (blankline>0) { print \"\"; blankline=0; } print $0; }" + ("awk '\n" + ("BEGIN { blankline=0; anonblank=0; }\n" + "/^$/ { if (anonblank==0) next; }\n" + "{ anonblank=1; }\n" + "/^$/ { blankline++; next; }\n" + "{ if (blankline>0) { print \"\"; blankline=0; } print $0; }\n" "'" )) ) -- 2.39.5