Navigation

Changeset 5187 for modules/branches/2.3/core/bin

Timestamp:

11/02/07 17:47:03 (5 years ago)

Author:

p_lindheimer

Message:

#2359 deal with other special characters in fax did during fax processing

Files:

r4110	r5187
53	53	$subject = $tmp;
54	54	}
55		# Convert %2~~0 to spaces, leave anythign~~ else alone.
	55	# Convert %2x to proper characters, leave anything else alone.
56	56	$subject =~ s/\%20/ /g;
	57	$subject =~ s/\%21/\!/g;
	58	$subject =~ s/\%22/\"/g;
	59	$subject =~ s/\%23/\#/g;
	60	$subject =~ s/\%24/\$/g;
	61	$subject =~ s/\%25/\%/g;
	62	$subject =~ s/\%26/\&/g;
	63	$subject =~ s/\%27/\'/g;
	64	$subject =~ s/\%28/\(/g;
	65	$subject =~ s/\%29/\)/g;
	66	$subject =~ s/\%2a/\*/g;
	67	$subject =~ s/\%2A/\*/g;
	68	$subject =~ s/\%2b/\+/g;
	69	$subject =~ s/\%2B/\+/g;
	70	$subject =~ s/\%2c/\,/g;
	71	$subject =~ s/\%2C/\,/g;
	72	$subject =~ s/\%2d/\-/g;
	73	$subject =~ s/\%2D/\-/g;
	74	$subject =~ s/\%2e/\./g;
	75	$subject =~ s/\%2E/\./g;
	76	$subject =~ s/\%2f/\//g;
	77	$subject =~ s/\%2F/\//g;
57	78	} elsif ($cmd eq "--type") {
58	79	my $tmp = shift @ARGV;