| Lines 36-41
          sub _check_params {
      
      
        Link Here | 
        
          | 36 |         'oblique_title', | 36 |         'oblique_title', | 
        
          | 37 |         'font', | 37 |         'font', | 
        
          | 38 |         'font_size', | 38 |         'font_size', | 
            
              |  |  | 39 |         'scale_width', | 
            
              | 40 |         'scale_height', | 
        
          | 39 |         'callnum_split', | 41 |         'callnum_split', | 
        
          | 40 |         'justify', | 42 |         'justify', | 
        
          | 41 |         'format_string', | 43 |         'format_string', | 
  
    | Lines 224-231
          sub _BAR {
      
      
        Link Here | 
        
          | 224 |     my $self = shift; | 226 |     my $self = shift; | 
        
          | 225 |     my $barcode_llx = $self->{'llx'} + $self->{'left_text_margin'};     # this places the bottom left of the barcode the left text margin distance to right of the left edge of the label ($llx) | 227 |     my $barcode_llx = $self->{'llx'} + $self->{'left_text_margin'};     # this places the bottom left of the barcode the left text margin distance to right of the left edge of the label ($llx) | 
        
          | 226 |     my $barcode_lly = $self->{'lly'} + $self->{'top_text_margin'};      # this places the bottom left of the barcode the top text margin distance above the bottom of the label ($lly) | 228 |     my $barcode_lly = $self->{'lly'} + $self->{'top_text_margin'};      # this places the bottom left of the barcode the top text margin distance above the bottom of the label ($lly) | 
          
            
              | 227 |     my $barcode_width = 0.8 * $self->{'width'};                         # this scales the barcode width to 80% of the label width | 229 |     my $barcode_width = $self->{'scale_width'} * $self->{'width'};      # You can choose the width of barcode, default value is 0.8 : 80% of the label width | 
            
              | 228 |     my $barcode_y_scale_factor = 0.01 * $self->{'height'};              # this scales the barcode height to 10% of the label height | 230 |     my $barcode_y_scale_factor = $self->{'scale_height'} * $self->{'height'};      # You can choose the height of barcode, default value is 0.01 : 10% of the label height | 
        
          | 229 |     return 0, 0, 0, $barcode_llx, $barcode_lly, $barcode_width, $barcode_y_scale_factor; | 231 |     return 0, 0, 0, $barcode_llx, $barcode_lly, $barcode_width, $barcode_y_scale_factor; | 
        
          | 230 | } | 232 | } | 
        
          | 231 |  | 233 |  | 
  
    | Lines 233-240
          sub _BIBBAR {
      
      
        Link Here | 
        
          | 233 |     my $self = shift; | 235 |     my $self = shift; | 
        
          | 234 |     my $barcode_llx = $self->{'llx'} + $self->{'left_text_margin'};     # this places the bottom left of the barcode the left text margin distance to right of the left edge of the label ($self->{'llx'}) | 236 |     my $barcode_llx = $self->{'llx'} + $self->{'left_text_margin'};     # this places the bottom left of the barcode the left text margin distance to right of the left edge of the label ($self->{'llx'}) | 
        
          | 235 |     my $barcode_lly = $self->{'lly'} + $self->{'top_text_margin'};      # this places the bottom left of the barcode the top text margin distance above the bottom of the label ($lly) | 237 |     my $barcode_lly = $self->{'lly'} + $self->{'top_text_margin'};      # this places the bottom left of the barcode the top text margin distance above the bottom of the label ($lly) | 
          
            
              | 236 |     my $barcode_width = 0.8 * $self->{'width'};                         # this scales the barcode width to 80% of the label width | 238 |     my $barcode_width = $self->{'scale_width'} * $self->{'width'};      # You can choose the width of barcode, default value is 0.8 : 80% of the label width | 
            
              | 237 |     my $barcode_y_scale_factor = 0.01 * $self->{'height'};              # this scales the barcode height to 10% of the label height | 239 |     my $barcode_y_scale_factor = $self->{'scale_height'} * $self->{'height'};       # You can choose the height of barcode, default value is 0.01 : 10% of the label height | 
        
          | 238 |     my $line_spacer = ($self->{'font_size'} * 1);       # number of pixels between text rows (This is actually leading: baseline to baseline minus font size. Recommended starting point is 20% of font size.). | 240 |     my $line_spacer = ($self->{'font_size'} * 1);       # number of pixels between text rows (This is actually leading: baseline to baseline minus font size. Recommended starting point is 20% of font size.). | 
        
          | 239 |     my $text_lly = ($self->{'lly'} + ($self->{'height'} - $self->{'top_text_margin'})); | 241 |     my $text_lly = ($self->{'lly'} + ($self->{'height'} - $self->{'top_text_margin'})); | 
        
          | 240 |     return $self->{'llx'}, $text_lly, $line_spacer, $barcode_llx, $barcode_lly, $barcode_width, $barcode_y_scale_factor; | 242 |     return $self->{'llx'}, $text_lly, $line_spacer, $barcode_llx, $barcode_lly, $barcode_width, $barcode_y_scale_factor; | 
  
    | Lines 244-251
          sub _BARBIB {
      
      
        Link Here | 
        
          | 244 |     my $self = shift; | 246 |     my $self = shift; | 
        
          | 245 |     my $barcode_llx = $self->{'llx'} + $self->{'left_text_margin'};                             # this places the bottom left of the barcode the left text margin distance to right of the left edge of the label ($self->{'llx'}) | 247 |     my $barcode_llx = $self->{'llx'} + $self->{'left_text_margin'};                             # this places the bottom left of the barcode the left text margin distance to right of the left edge of the label ($self->{'llx'}) | 
        
          | 246 |     my $barcode_lly = ($self->{'lly'} + $self->{'height'}) - $self->{'top_text_margin'};        # this places the bottom left of the barcode the top text margin distance below the top of the label ($self->{'lly'}) | 248 |     my $barcode_lly = ($self->{'lly'} + $self->{'height'}) - $self->{'top_text_margin'};        # this places the bottom left of the barcode the top text margin distance below the top of the label ($self->{'lly'}) | 
          
            
              | 247 |     my $barcode_width = 0.8 * $self->{'width'};                                                 # this scales the barcode width to 80% of the label width | 249 |     my $barcode_width = $self->{'scale_width'} * $self->{'width'};                              # You can choose the width of barcode, default value is 0.8 : 80% of the label width | 
            
              | 248 |     my $barcode_y_scale_factor = 0.01 * $self->{'height'};                                      # this scales the barcode height to 10% of the label height | 250 |     my $barcode_y_scale_factor = $self->{'scale_height'} * $self->{'height'};                   # You can choose the height of barcode, default value is 0.01 : 10% of the label height | 
        
          | 249 |     my $line_spacer = ($self->{'font_size'} * 1);                               # number of pixels between text rows (This is actually leading: baseline to baseline minus font size. Recommended starting point is 20% of font size.). | 251 |     my $line_spacer = ($self->{'font_size'} * 1);                               # number of pixels between text rows (This is actually leading: baseline to baseline minus font size. Recommended starting point is 20% of font size.). | 
        
          | 250 |     my $text_lly = (($self->{'lly'} + $self->{'height'}) - $self->{'top_text_margin'} - (($self->{'lly'} + $self->{'height'}) - $barcode_lly)); | 252 |     my $text_lly = (($self->{'lly'} + $self->{'height'}) - $self->{'top_text_margin'} - (($self->{'lly'} + $self->{'height'}) - $barcode_lly)); | 
        
          | 251 |     return $self->{'llx'}, $text_lly, $line_spacer, $barcode_llx, $barcode_lly, $barcode_width, $barcode_y_scale_factor; | 253 |     return $self->{'llx'}, $text_lly, $line_spacer, $barcode_llx, $barcode_lly, $barcode_width, $barcode_y_scale_factor; | 
  
    | Lines 269-274
          sub new {
      
      
        Link Here | 
        
          | 269 |         oblique_title           => $params{'oblique_title'}, | 271 |         oblique_title           => $params{'oblique_title'}, | 
        
          | 270 |         font                    => $params{'font'}, | 272 |         font                    => $params{'font'}, | 
        
          | 271 |         font_size               => $params{'font_size'}, | 273 |         font_size               => $params{'font_size'}, | 
            
              |  |  | 274 |         scale_width             => $params{'scale_width'}, | 
            
              | 275 |         scale_height            => $params{'scale_height'}, | 
        
          | 272 |         callnum_split           => $params{'callnum_split'}, | 276 |         callnum_split           => $params{'callnum_split'}, | 
        
          | 273 |         justify                 => $params{'justify'}, | 277 |         justify                 => $params{'justify'}, | 
        
          | 274 |         format_string           => $params{'format_string'}, | 278 |         format_string           => $params{'format_string'}, |