diff options
author | lpsolit%gmail.com <> | 2007-07-20 19:15:54 +0200 |
---|---|---|
committer | lpsolit%gmail.com <> | 2007-07-20 19:15:54 +0200 |
commit | 5d82939ef8b5a7fdc238ee15067b33fd0c17a242 (patch) | |
tree | eb28dbe3d42239b117c7806e862f6328f9d46c52 /Bugzilla | |
parent | c20df721aac9a4d95f76968ff6e938b296d2c056 (diff) | |
download | bugzilla-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.pm | 26 |
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, |