From: schwarze@mandoc.bsd.lv
To: source@mandoc.bsd.lv
Subject: cvsweb: more enscript cleanup
Date: Mon, 11 Nov 2019 10:23:55 -0500 (EST) [thread overview]
Message-ID: <8d0773b687c4160d@mandoc.bsd.lv> (raw)
Log Message:
-----------
more enscript cleanup
Removed Files:
-------------
cvsweb/enscript:
lang_cvsweb.st
lang_cvsweb_diff.st
Revision Data
-------------
--- enscript/lang_cvsweb.st
+++ /dev/null
@@ -1,74 +0,0 @@
-/*
- GNU Enscript language file for FreeBSD-CVSweb.
- $FreeBSD$
- */
-
-state lang_cvsweb
-{
- BEGIN {
- /* RGB -> HTML color mapper function. */
- sub map_color (r, g, b)
- {
- return sprintf ("#%02X%02X%02X", r, g, b);
- }
-
- LANGUAGE_SPECIALS = /[<>\&\"]/;
-
- sub language_print (str)
- {
- str = regsuball (str, /\&/, "&");
- str = regsuball (str, /</, "<");
- str = regsuball (str, />/, ">");
- str = regsuball (str, /\"/, """);
- print (str);
- }
-
- sub language_symbol (symbol)
- {
- return false;
- }
-
- sub header ()
- {
- }
-
- sub trailer ()
- {
- }
-
- sub face_on (face)
- {
- if (face[boldp])
- print ("<b>");
- if (face[italicp])
- print ("<i>");
-
- if (face[fg_color])
- print ("<span style=\"color: ", face[fg_color], "\">");
- if (face[bg_color])
- print ("<span style=\"background-color: ", face[bg_color], "\">");
- }
-
- sub face_off (face)
- {
- if (face[fg_color])
- print ("</span>");
- if (face[bg_color])
- print ("</span>");
-
- if (face[italicp])
- print ("</i>");
- if (face[boldp])
- print ("</b>");
- }
-
- return;
- }
-}
-
-\f
-/*
-Local variables:
-mode: c
-End:
-*/
--- enscript/lang_cvsweb_diff.st
+++ /dev/null
@@ -1,74 +0,0 @@
-/*
- GNU Enscript language file for FreeBSD-CVSweb diffs.
- $FreeBSD$
- */
-
-state lang_cvsweb_diff
-{
- BEGIN {
- /* RGB -> HTML color mapper function. */
- sub map_color (r, g, b)
- {
- return sprintf ("#%02X%02X%02X", r, g, b);
- }
-
- LANGUAGE_SPECIALS = /[<>\&\"]/;
-
- sub language_print (str)
- {
- str = regsuball (str, /\&/, "&");
- str = regsuball (str, /</, "<");
- str = regsuball (str, />/, ">");
- str = regsuball (str, /\"/, """);
- print (str);
- }
-
- sub language_symbol (symbol)
- {
- return false;
- }
-
- sub header ()
- {
- }
-
- sub trailer ()
- {
- }
-
- sub face_on (face)
- {
- if (face[boldp])
- print ("<b>");
- if (face[italicp])
- print ("<i>");
-
- if (face[fg_color])
- print ("<span style=\"color: ", face[fg_color], "; background-color: lightgrey\">");
- if (face[bg_color])
- print ("<span style=\"background-color: ", face[bg_color], "\">");
- }
-
- sub face_off (face)
- {
- if (face[fg_color])
- print ("</span>");
- if (face[bg_color])
- print ("</span>");
-
- if (face[italicp])
- print ("</i>");
- if (face[boldp])
- print ("</b>");
- }
-
- return;
- }
-}
-
-\f
-/*
-Local variables:
-mode: c
-End:
-*/
--
To unsubscribe send an email to source+unsubscribe@mandoc.bsd.lv
reply other threads:[~2019-11-11 15:23 UTC|newest]
Thread overview: [no followups] expand[flat|nested] mbox.gz Atom feed
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=8d0773b687c4160d@mandoc.bsd.lv \
--to=schwarze@mandoc.bsd.lv \
--cc=source@mandoc.bsd.lv \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).