The R Project SVN R

Rev

Rev 20419 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed 

get_dcf_field () {
  ## Get one field including all continuation lines from a DCF file.
  ## Usage:
  ##   get_dcf_field FIELD FILE
  ws="[     ]"      # space and tab
  (sed -n "/^${1}:/,/^[^ ]/{p;}" ${2} | \
    sed -n "/^${1}:/{s/^${1}:${ws}*//;p;}
            /^${ws}/{s/^${ws}*//;p;}") |
    sed "s/[    
]*$//"
}

### Local Variables: ***
### mode: sh ***
### sh-indentation: 2 ***
### End: ***