| 
      
            Lines 304-310
          $prepared_letter = GetPreparedLetter((
      
      
        Link Here
      
     | 
  
        
          | 304 | 
              substitute             => $substitute,  | 
          304 | 
              substitute             => $substitute,  | 
        
        
          | 305 | 
              repeat                 => $repeat,  | 
          305 | 
              repeat                 => $repeat,  | 
        
        
          | 306 | 
          ));  | 
          306 | 
          ));  | 
        
          
            
              | 307 | 
              is( $prepared_letter->{content}, q|This one only contains the date: | . output_pref({ dt => $date, dateonly => 1 }) . q|.| ); | 
              307 | 
              is( $prepared_letter->{content}, q|This one only contains the date: | . output_pref({ dt => $date, dateonly => 1 }) . q|.|, 'dateonly test 1' ); | 
            
        
          | 308 | 
           | 
          308 | 
           | 
        
        
          | 309 | 
          $dbh->do(q{UPDATE letter SET content = 'And also this one:<<timestamp | dateonly>>.' WHERE code = 'test_date';}); | 
          309 | 
          $dbh->do(q{UPDATE letter SET content = 'And also this one:<<timestamp | dateonly>>.' WHERE code = 'test_date';}); | 
        
        
          | 310 | 
          $prepared_letter = GetPreparedLetter((  | 
          310 | 
          $prepared_letter = GetPreparedLetter((  | 
        
  
    | 
      
            Lines 315-321
          $prepared_letter = GetPreparedLetter((
      
      
        Link Here
      
     | 
  
        
          | 315 | 
              substitute             => $substitute,  | 
          315 | 
              substitute             => $substitute,  | 
        
        
          | 316 | 
              repeat                 => $repeat,  | 
          316 | 
              repeat                 => $repeat,  | 
        
        
          | 317 | 
          ));  | 
          317 | 
          ));  | 
        
          
            
              | 318 | 
              is( $prepared_letter->{content}, q|This one only contains the date: | . output_pref({ dt => $date, dateonly => 1 }) . q|.| ); | 
              318 | 
              is( $prepared_letter->{content}, q|This one only contains the date: | . output_pref({ dt => $date, dateonly => 1 }) . q|.|, 'dateonly test 2' ); | 
            
        
          | 319 | 
           | 
          319 | 
           | 
        
        
          | 320 | 
          $dbh->do(q{UPDATE letter SET content = 'And also this one:<<timestamp|dateonly >>.' WHERE code = 'test_date';}); | 
          320 | 
          $dbh->do(q{UPDATE letter SET content = 'And also this one:<<timestamp|dateonly >>.' WHERE code = 'test_date';}); | 
        
        
          | 321 | 
          $prepared_letter = GetPreparedLetter((  | 
          321 | 
          $prepared_letter = GetPreparedLetter((  | 
        
  
    | 
      
            Lines 326-332
          $prepared_letter = GetPreparedLetter((
      
      
        Link Here
      
     | 
  
        
          | 326 | 
              substitute             => $substitute,  | 
          326 | 
              substitute             => $substitute,  | 
        
        
          | 327 | 
              repeat                 => $repeat,  | 
          327 | 
              repeat                 => $repeat,  | 
        
        
          | 328 | 
          ));  | 
          328 | 
          ));  | 
        
          
            
              | 329 | 
              is( $prepared_letter->{content}, q|This one only contains the date: | . output_pref({ dt => $date, dateonly => 1 }) . q|.| ); | 
              329 | 
              is( $prepared_letter->{content}, q|This one only contains the date: | . output_pref({ dt => $date, dateonly => 1 }) . q|.|, 'dateonly test 3' ); | 
            
        
          | 330 | 
           | 
          330 | 
           | 
        
        
          | 331 | 
          $dbh->do(q{INSERT INTO letter (module, code, name, title, content) VALUES ('claimacquisition','TESTACQCLAIM','Acquisition Claim','Item Not Received','<<aqbooksellers.name>>|<<aqcontacts.name>>|<order>Ordernumber <<aqorders.ordernumber>> (<<biblio.title>>) (<<aqorders.quantity>> ordered)</order>');}); | 
          331 | 
          $dbh->do(q{INSERT INTO letter (module, code, name, title, content) VALUES ('claimacquisition','TESTACQCLAIM','Acquisition Claim','Item Not Received','<<aqbooksellers.name>>|<<aqcontacts.name>>|<order>Ordernumber <<aqorders.ordernumber>> (<<biblio.title>>) (<<aqorders.quantity>> ordered)</order>');}); | 
        
        
          | 332 | 
           | 
          332 | 
           | 
        
            
              | 333 | 
              -   | 
               | 
               |