Changeset 6611


Ignore:
Timestamp:
11/17/10 14:15:57 (14 years ago)
Author:
Mathieu Morlighem
Message:

simpler startup.m using getenv matlab built-in function

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk/startup.m

    r6395 r6611  
    1313
    1414%Recover ISSM_TIER, ISSM_DIR and USERNAME
    15 if ispc,
    16         [status1,ISSM_TIER]=system('echo [%ISSM_TIER_WIN%]');
    17         [status2,ISSM_DIR] =system('echo [%ISSM_DIR_WIN%]');
    18         [status3,USERNAME] =system('echo [%USER%]');
    19 else
    20         [status1,ISSM_TIER]=system('echo $ISSM_TIER');
    21         [status2,ISSM_DIR] =system('echo $ISSM_DIR');
    22         [status3,USERNAME] =system('echo $USER');
    23 end
    24 if status1~=0, error('startup error message: problem when running ''echo $ISSM_TIER'' shell command'); end
    25 if status2~=0, error('startup error message: problem when running ''echo $ISSM_DIR'' shell command'); end
    26 if status3~=0, error('startup error message: problem when running ''echo $USER'' shell command'); end
    27 clear status1 status2 status3;
    28 if (length(ISSM_TIER)<=1),
     15ISSM_TIER=getenv('ISSM_TIER');
     16ISSM_DIR =getenv('ISSM_DIR');
     17USERNAME =getenv('USER');
     18if (isempty(ISSM_TIER)),
    2919        error('issmdir error message: ''ISSM_TIER'' environment variable is empty! You should define ISSM_TIER in your .cshrc or .bashrc!');
    3020end
    31 if (length(ISSM_DIR)<=1),
     21if (isempty(ISSM_DIR)),
    3222        error('issmdir error message: ''ISSM_DIR'' environment variable is empty! You should define ISSM_DIR in your .cshrc or .bashrc!');
    3323end
    34 
    35 %get rid of useless symbols in the name
    36 ISSM_TIER=strtrim(ISSM_TIER);
    37 ISSM_DIR =strtrim(ISSM_DIR);
    38 USERNAME =strtrim(USERNAME);
    3924
    4025%Now add all issm code paths necessary to run issm smoothly.
Note: See TracChangeset for help on using the changeset viewer.