View | Details | Raw Unified | Return to bug 34838
Collapse All | Expand All

(-)a/Koha/Illbackend.pm (-2 / +2 lines)
Lines 35-41 New illbackend Link Here
35 

          35
          

        

        

          36
          
sub new {

          36
          
sub new {

        

        

          37
          
    my $class = shift;

          37
          
    my $class = shift;

        

          
            

              38
              
    my $self = {};


              38
              
    my $self  = {};

            

        

          39
          
    return bless $self, $class;

          39
          
    return bless $self, $class;

        

        

          40
          
}

          40
          
}

        

        

          41
          

          41
          

        

  

    
      
            Lines 117-123
          sub embed {
      
      
        Link Here
      
    
  

        

          117
          

          117
          

        

        

          118
          
    foreach my $embed_req ( split /\s*,\s*/, $embed_header ) {

          118
          
    foreach my $embed_req ( split /\s*,\s*/, $embed_header ) {

        

        

          119
          
        if ( $embed_req eq 'statuses+strings' ) {

          119
          
        if ( $embed_req eq 'statuses+strings' ) {

        

          
            

              120
              
            $return_embed->{statuses} = $self->existing_statuses( $backend_id );


              120
              
            $return_embed->{statuses} = $self->existing_statuses($backend_id);

            

        

          121
          
        }

          121
          
        }

        

        

          122
          
    }

          122
          
    }

        

        

          123
          
    return $return_embed;

          123
          
    return $return_embed;

        



(-)a/Koha/Illrequest.pm
      (-11 / +14 lines)




  

    
      
            Lines 1972-1992
          sub strings_map {
      
      
        Link Here
      
    
  

        

          1972
          
    }

          1972
          
    }

        

        

          1973
          

          1973
          

        

        

          1974
          
    my $status_string =

          1974
          
    my $status_string =

        

          
            

              1975
              
      ( $self->status && exists $status_graph_union->{ $self->status } && defined $status_graph_union->{ $self->status }->{name} )


              1975
              
        (      $self->status

            

            

              1976
              
      ? $status_graph_union->{ $self->status }->{name}


              1976
              
            && exists $status_graph_union->{ $self->status }

            

            

              1977
              
      : $self->status;


              1977
              
            && defined $status_graph_union->{ $self->status }->{name} )

            

            

              
              

              1978
              
        ? $status_graph_union->{ $self->status }->{name}

            

            


              1979
              
        : $self->status;

            

        

          1978
          

          1980
          

        

        

          1979
          
    my $status_code =

          1981
          
    my $status_code =

        

          
            

              1980
              
      ( $self->status && exists $status_graph_union->{ $self->status } && defined $status_graph_union->{ $self->status }->{id} )


              1982
              
        (      $self->status

            

            

              1981
              
      ? $status_graph_union->{ $self->status }->{id}


              1983
              
            && exists $status_graph_union->{ $self->status }

            

            

              1982
              
      : $self->status;


              1984
              
            && defined $status_graph_union->{ $self->status }->{id} )

            

            

              
              

              1985
              
        ? $status_graph_union->{ $self->status }->{id}

            

            


              1986
              
        : $self->status;

            

        

          1983
          

          1987
          

        

        

          1984
          
    my $strings = {

          1988
          
    my $strings = {

        

        

          1985
          
        status => {

          1989
          
        status => {

        

          
            

              1986
              
            backend => $self->backend, # the backend identifier


              1990
              
            backend => $self->backend,    # the backend identifier

            

            

              1987
              
            str     => $status_string, # the status description, taken from the status graph


              1991
              
            str     => $status_string,    # the status description, taken from the status graph

            

            

              1988
              
            code    => $status_code,   # the status id, taken from the status graph


              1992
              
            code    => $status_code,      # the status id, taken from the status graph

            

            

              1989
              
            type    => 'ill_status',   # fixed type


              1993
              
            type    => 'ill_status',      # fixed type

            

        

          1990
          
        }

          1994
          
        }

        

        

          1991
          
    };

          1995
          
    };

        

        

          1992
          

          1996
          

        

            

              1993
              
- 

              
              
            






  

  Return to bug 34838