Changeset 48


Ignore:
Timestamp:
11/04/09 14:49:53 (15 years ago)
Author:
ymipsl
Message:

La subroutine iomanger::set_attribut ne diagonostique plus les messages d'erreur (rustine demandé par S. Masson)

YM

File:
1 edited

Legend:

Unmodified
Added
Removed
  • XMLIO_SERVER/trunk/src/IOSERVER/mod_iomanager.f90

    r47 r48  
    406406        CASE(field_object) 
    407407          CALL field_group__set_attribut(id,attrib,success) 
    408           IF (.NOT. success) CALL field__set_attribut(id,attrib)          
     408          IF (.NOT. success) CALL field__set_attribut(id,attrib,success)          
    409409        CASE(file_object) 
    410410          CALL file_group__set_attribut(id,attrib,success) 
     
    412412        CASE(axis_object) 
    413413          CALL axis_group__set_attribut(id,attrib,success) 
    414           IF (.NOT. success) CALL axis__set_attribut(id,attrib)          
     414          IF (.NOT. success) CALL axis__set_attribut(id,attrib,success)          
    415415        CASE(grid_object) 
    416416          CALL grid_group__set_attribut(id,attrib,success) 
    417           IF (.NOT. success) CALL grid__set_attribut(id,attrib)          
     417          IF (.NOT. success) CALL grid__set_attribut(id,attrib,success)          
    418418        CASE(zoom_object) 
    419           CALL zoom__set_attribut(id,attrib) 
     419          CALL zoom__set_attribut(id,attrib,success) 
    420420      END SELECT 
    421421    ENDIF 
Note: See TracChangeset for help on using the changeset viewer.