summaryrefslogtreecommitdiffstats
path: root/Bugzilla
diff options
context:
space:
mode:
authorlpsolit%gmail.com <>2007-07-20 19:15:54 +0200
committerlpsolit%gmail.com <>2007-07-20 19:15:54 +0200
commit5d82939ef8b5a7fdc238ee15067b33fd0c17a242 (patch)
treeeb28dbe3d42239b117c7806e862f6328f9d46c52 /Bugzilla
parentc20df721aac9a4d95f76968ff6e938b296d2c056 (diff)
downloadbugzilla-5d82939ef8b5a7fdc238ee15067b33fd0c17a242.tar.gz
bugzilla-5d82939ef8b5a7fdc238ee15067b33fd0c17a242.tar.xz
Bug 327914: Make Bugzilla::Util::perform_substs() go away - Patch by Frédéric Buclin <LpSolit@gmail.com> r/a=mkanat
Diffstat (limited to 'Bugzilla')
-rw-r--r--Bugzilla/Util.pm26
1 files changed, 0 insertions, 26 deletions
diff --git a/Bugzilla/Util.pm b/Bugzilla/Util.pm
index e97bb11d0..c6560dd11 100644
--- a/Bugzilla/Util.pm
+++ b/Bugzilla/Util.pm
@@ -39,7 +39,6 @@ use base qw(Exporter);
lsearch
diff_arrays diff_strings
trim wrap_comment find_wrap_point
- perform_substs
format_time format_time_decimal validate_date
file_mod_time is_7bit_clean
bz_crypt generate_random_password
@@ -355,12 +354,6 @@ sub find_wrap_point {
return $wrappoint;
}
-sub perform_substs {
- my ($str, $substs) = (@_);
- $str =~ s/%([a-z]*)%/(defined $substs->{$1} ? $substs->{$1} : Bugzilla->params->{$1})/eg;
- return $str;
-}
-
sub format_time {
my ($date, $format) = @_;
@@ -566,7 +559,6 @@ Bugzilla::Util - Generic utility functions for bugzilla
$val = trim(" abc ");
($removed, $added) = diff_strings($old, $new);
$wrapped = wrap_comment($comment);
- $msg = perform_substs($str, $substs);
# Functions for formatting time
format_time($time);
@@ -768,24 +760,6 @@ Search for a comma, a whitespace or a hyphen to split $string, within the first
$maxpos characters. If none of them is found, just split $string at $maxpos.
The search starts at $maxpos and goes back to the beginning of the string.
-=item C<perform_substs($str, $substs)>
-
-Performs substitutions for sending out email with variables in it,
-or for inserting a parameter into some other string.
-
-Takes a string and a reference to a hash containing substitution
-variables and their values.
-
-If the hash is not specified, or if we need to substitute something
-that's not in the hash, then we will use parameters to do the
-substitution instead.
-
-Substitutions are always enclosed with '%' symbols. So they look like:
-%some_variable_name%. If "some_variable_name" is a key in the hash, then
-its value will be placed into the string. If it's not a key in the hash,
-then the value of the parameter called "some_variable_name" will be placed
-into the string.
-
=item C<is_7bit_clean($str)>
Returns true is the string contains only 7-bit characters (ASCII 32 through 126,