|
Lines 261-267
sub draw_text {
Link Here
|
| 261 |
warn sprintf('Line wrap failed. DEBUG INFO: Data: \'%s\'\n Method: C4::Patroncards->draw_text Additional Information: Line wrap regexp failed. (Please file in this information in a bug report at http://bugs.koha-community.org', $line) and last WRAP_LINES if !$1; |
261 |
warn sprintf('Line wrap failed. DEBUG INFO: Data: \'%s\'\n Method: C4::Patroncards->draw_text Additional Information: Line wrap regexp failed. (Please file in this information in a bug report at http://bugs.koha-community.org', $line) and last WRAP_LINES if !$1; |
| 262 |
$trim = $1 . $trim; |
262 |
$trim = $1 . $trim; |
| 263 |
#Sanitize the input into this regular expression so regex metacharacters are escaped as literal values (https://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=22429) |
263 |
#Sanitize the input into this regular expression so regex metacharacters are escaped as literal values (https://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=22429) |
| 264 |
$line =~ s/\Q$1\E//; |
264 |
$line =~ s/\Q$1\E$//; |
| 265 |
$string_width = C4::Creators::PDF->StrWidth($line, $text_attribs->{'font'}, $text_attribs->{'font_size'}); |
265 |
$string_width = C4::Creators::PDF->StrWidth($line, $text_attribs->{'font'}, $text_attribs->{'font_size'}); |
| 266 |
# $font_units_width = $m->string_width($line); |
266 |
# $font_units_width = $m->string_width($line); |
| 267 |
# $string_width = ($font_units_width * $text_attribs->{'font_size'}) / $units_per_em; |
267 |
# $string_width = ($font_units_width * $text_attribs->{'font_size'}) / $units_per_em; |
| 268 |
- |
|
|