Changeset 755
- Timestamp:
- 03/04/11 15:48:47 (15 months ago)
- Files:
-
- 1 modified
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/parser/docparrstformatparser__define.pro
r751 r755 480 480 ; 4: required 481 481 for a = 0L, n_elements(attributes) - 1L do begin 482 if (strmid(attributes[a], strpos(attributes[a], '=') + 1L, 1) eq '"') then begin 482 quote = strmid(attributes[a], strpos(attributes[a], '=') + 1L, 1) 483 if (quote eq '"' || quote eq '`' || quote eq '''') then begin 483 484 ; add following attributes until closing quote or end of line 484 485 i = a + 1L … … 488 489 attributes[i] = '' 489 490 490 if (strpos(t, '"') ne -1L) then break491 if (strpos(t, quote) ne -1L) then break 491 492 492 493 i++ … … 494 495 495 496 ; fix up attributes[a] by removing quotes 496 firstQuote = strpos(attributes[a], '"')497 secondQuote = strpos(attributes[a], '"', firstQuote + 1L)497 firstQuote = strpos(attributes[a], quote) 498 secondQuote = strpos(attributes[a], quote, firstQuote + 1L) 498 499 if (secondQuote eq -1L) then secondQuote = strlen(attributes[a]) 499 500 valueLength = secondQuote - firstQuote - 1L
