Skip to content
This repository was archived by the owner on Jun 1, 2023. It is now read-only.

Commit 1dc5d4b

Browse files
author
Reini Urban
committed
Add CODE_OF_CONDUCT.md
with the No Code of Conduct text, links to the conflicting development policies of p5p vs cperl and links to https://nocodeofconduct.com/ Closes #226
1 parent ff02c03 commit 1dc5d4b

File tree

3 files changed

+19
-2
lines changed

3 files changed

+19
-2
lines changed

CODE_OF_CONDUCT.md

Lines changed: 15 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,15 @@
1+
# Contributor Code of Conduct
2+
3+
This project adheres to **No Code of Conduct**.
4+
5+
We are all adults.
6+
We accept anyone's contributions.
7+
If you are feeling harrassed speak up by yourself.
8+
We do not censor, we don't stop any discussions.
9+
Nothing else matters.
10+
11+
Compare the conflicting [p5p STANDARDS OF CONDUCT](http://perldoc.perl.org/perlpolicy.html#STANDARDS-OF-CONDUCT), which was abused to silence technical criticism and demeaning technical remarks on the maintainership in the last years, and the [cperl development policies](http://perl11.org/cperl/perlcperl.html#Development-policies).
12+
cperl can stand criticsm and encourages criticism, but doesn't allow abuse.
13+
perl5 silences them via code of conduct and still is toxic and effectively dead.
14+
15+
For more information please visit the [No Code of Conduct](https://nocodeofconduct.com) homepage.

MANIFEST

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -14,6 +14,7 @@ caretx.c C file to create $^X
1414
cflags.SH A script that emits C compilation flags per file
1515
Changes Describe how to peruse changes between releases
1616
charclass_invlists.h Compiled-in inversion lists
17+
CODE_OF_CONDUCT.md Contributor Code of Conduct
1718
config_h.SH Produces config.h
1819
configpm Produces lib/Config.pm
1920
Configure Portability tool

t/porting/filenames.t

Lines changed: 3 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -72,8 +72,9 @@ PATHNAME: for my $pathname (@files) {
7272
fail("$pathname has more than 39 characters after the dot");
7373
} elsif ($filename =~ /^(?:CON|PRN|AUX|NUL|COM[1-9]|LPT[1-9])\./i) {
7474
fail("$pathname has a reserved name");
75-
} elsif ($filename =~ /\s|\(|\&/) {
76-
fail("$pathname has a reserved character");
75+
} elsif ($filename =~ /(\s|\(|\&)/) {
76+
# detects a missing tab
77+
fail("$pathname has a reserved character ($filename: $1)");
7778
} else {
7879
pass("$pathname ok");
7980
}

0 commit comments

Comments
 (0)