File: patch.2.3.0

package info (click to toggle)
sympa 2.6.1-3
  • links: PTS
  • area: main
  • in suites: potato
  • size: 2,940 kB
  • ctags: 1,069
  • sloc: perl: 8,446; makefile: 237; sh: 191; ansic: 172; lisp: 32
file content (19 lines) | stat: -rw-r--r-- 559 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
*** sympa.pl.orig	Wed Sep 15 11:23:28 1999
--- sympa.pl	Thu Sep 16 16:18:21 1999
***************
*** 171,177 ****
  	## Extract listname from filename
  	my $listname = $1;
  	$listname =~ s/\@.*$//;
! 	$listname =~ s/^(\S+)-(request|owner|editor)$/$1/;
  	$listname =~ y/A-Z/a-z/;
  
  	if ($listname eq 'sympa') {	
--- 171,177 ----
  	## Extract listname from filename
  	my $listname = $1;
  	$listname =~ s/\@.*$//;
! 	$listname =~ s/^(\S+)-(request|owner|editor|subscribe|unsubscribe)$/$1/;
  	$listname =~ y/A-Z/a-z/;
  
  	if ($listname eq 'sympa') {