diff options
author | Ying-Chieh Liao <ijliao@FreeBSD.org> | 2002-09-18 10:21:36 +0000 |
---|---|---|
committer | Ying-Chieh Liao <ijliao@FreeBSD.org> | 2002-09-18 10:21:36 +0000 |
commit | 9077593494cf521a480f96247c835ccd0ed508a2 (patch) | |
tree | dc1f104ee415935eef0e7b7db497ca8339516cd1 /deskutils/mencal/files | |
parent | Update to 2.G. (diff) |
add mencal 2.0
A variation of the unix command cal
PR: 37195
Submitted by: Christian Brueffer <chris@unixpages.org>
Diffstat (limited to 'deskutils/mencal/files')
-rw-r--r-- | deskutils/mencal/files/patch-mencal | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/deskutils/mencal/files/patch-mencal b/deskutils/mencal/files/patch-mencal new file mode 100644 index 000000000000..baf21677526b --- /dev/null +++ b/deskutils/mencal/files/patch-mencal @@ -0,0 +1,22 @@ +--- mencal.orig Fri Mar 29 08:14:03 2002 ++++ mencal Wed Sep 18 18:19:07 2002 +@@ -1,4 +1,4 @@ +-#!/usr/bin/perl -w ++#!/usr/bin/env perl -w + + ##< month object >## + +@@ -271,13 +271,6 @@ + } + } + +- my @locales=split("\n", `locale -c LC_TIME`); +- if(($#locales>=1) && length($locales[1])) { +- $config{'topline'}=''; +- foreach my $day (split(';', $locales[1])) { $day=~s/^(..).+$/$1/; $config{'topline'}.=$day.' '; } +- $config{'topline'}=~s/ +$//; +- } +- $config{'topline'}=~s/;/ /g; + $config{'monday_first'} && $config{'topline'}=~s/^(..) (.+)$/$2 $1/; + + $config{'show_type'}=~/^(1|3|y)$/ || ($config{'show_type'}='1'); |