| Lines 172-177
          subtest 'add() tests' => sub {
      
      
        Link Here | 
        
          | 172 |  | 172 |  | 
        
          | 173 |     my $biblio = $builder->build_sample_biblio(); | 173 |     my $biblio = $builder->build_sample_biblio(); | 
        
          | 174 |     my $ticket = { | 174 |     my $ticket = { | 
            
              |  |  | 175 |         source    => 'catalog', | 
        
          | 175 |         biblio_id => $biblio->id, | 176 |         biblio_id => $biblio->id, | 
        
          | 176 |         title     => "Test ticket", | 177 |         title     => "Test ticket", | 
        
          | 177 |         body      => "Test ticket details", | 178 |         body      => "Test ticket details", | 
  
    | Lines 185-190
          subtest 'add() tests' => sub {
      
      
        Link Here | 
        
          | 185 |     # Authorized attempt to write invalid data | 186 |     # Authorized attempt to write invalid data | 
        
          | 186 |     my $ticket_with_invalid_field = { | 187 |     my $ticket_with_invalid_field = { | 
        
          | 187 |         blah      => "Something wrong", | 188 |         blah      => "Something wrong", | 
            
              |  |  | 189 |         source    => 'catalog', | 
        
          | 188 |         biblio_id => $biblio->id, | 190 |         biblio_id => $biblio->id, | 
        
          | 189 |         title     => "Test ticket", | 191 |         title     => "Test ticket", | 
        
          | 190 |         body      => "Test ticket details", | 192 |         body      => "Test ticket details", | 
  
    | Lines 230-235
          subtest 'add() tests' => sub {
      
      
        Link Here | 
        
          | 230 |  | 232 |  | 
        
          | 231 |     # Authorized attempt to write missing data | 233 |     # Authorized attempt to write missing data | 
        
          | 232 |     my $ticket_with_missing_field = { | 234 |     my $ticket_with_missing_field = { | 
            
              |  |  | 235 |         source    => 'catalog', | 
        
          | 233 |         biblio_id => $biblio->id, | 236 |         biblio_id => $biblio->id, | 
        
          | 234 |         body      => "Test ticket details", | 237 |         body      => "Test ticket details", | 
        
          | 235 |     }; | 238 |     }; | 
  
    | Lines 282-287
          subtest 'update() tests' => sub {
      
      
        Link Here | 
        
          | 282 |  | 285 |  | 
        
          | 283 |     # Attempt partial update on a PUT | 286 |     # Attempt partial update on a PUT | 
        
          | 284 |     my $ticket_with_missing_field = { | 287 |     my $ticket_with_missing_field = { | 
            
              |  |  | 288 |         source    => 'catalog', | 
        
          | 285 |         body      => "Test ticket details", | 289 |         body      => "Test ticket details", | 
        
          | 286 |     }; | 290 |     }; | 
        
          | 287 |  | 291 |  | 
  
    | Lines 292-297
          subtest 'update() tests' => sub {
      
      
        Link Here | 
        
          | 292 |  | 296 |  | 
        
          | 293 |     # Full object update on PUT | 297 |     # Full object update on PUT | 
        
          | 294 |     my $ticket_with_updated_field = { | 298 |     my $ticket_with_updated_field = { | 
            
              |  |  | 299 |         source    => 'catalog', | 
        
          | 295 |         title     => "Test ticket update", | 300 |         title     => "Test ticket update", | 
        
          | 296 |         body      => "Test ticket update details", | 301 |         body      => "Test ticket update details", | 
        
          | 297 |     }; | 302 |     }; | 
  
    | Lines 303-308
          subtest 'update() tests' => sub {
      
      
        Link Here | 
        
          | 303 |     # Authorized attempt to write invalid data | 308 |     # Authorized attempt to write invalid data | 
        
          | 304 |     my $ticket_with_invalid_field = { | 309 |     my $ticket_with_invalid_field = { | 
        
          | 305 |         blah        => "Ticket Blah", | 310 |         blah        => "Ticket Blah", | 
            
              |  |  | 311 |         source    => 'catalog', | 
        
          | 306 |         title     => "Test ticket update", | 312 |         title     => "Test ticket update", | 
        
          | 307 |         body      => "Test ticket update details", | 313 |         body      => "Test ticket update details", | 
        
          | 308 |     }; | 314 |     }; | 
            
              | 309 | -  |  |  |