# HG changeset patch # User Oleksandr Gavenko # Date 1626789831 -10800 # Node ID 2335b10cbc888b9a6ae5945644d2f9e712ee6049 # Parent 0274fa6f1aca92614e6f593c12c7695f8c5a78ef Added highlighting of SSR's FullText. diff -r 0274fa6f1aca -r 2335b10cbc88 mylisp/gds-sabre.el --- a/mylisp/gds-sabre.el Wed Jul 14 12:24:40 2021 +0300 +++ b/mylisp/gds-sabre.el Tue Jul 20 17:03:51 2021 +0300 @@ -24,7 +24,7 @@ (highlight-regexp " \\(?:[[:alpha:]_]*PseudoCityCode\\|CreationAgent\\|BookingSource\\|AgentSine\\)=\"\\([^\"]+\\)\"" 'hi-pink 1) (highlight-regexp "<\\([[:alnum:]]*:?\\)\\(RecordLocator\\|DepartureAirport\\|ArrivalAirport\\|MarketingAirlineCode\\|MarketingFlightNumber\\)>\\([^<]+\\)" 'hi-pink 3) (highlight-phrase ":Arunk\\|:FlightSegment\\>\\|:FareBasis\\>" 'hi-pink) - (highlight-regexp "<\\([[:alnum:]]*:?\\)\\(ActionCode\\|InputEntry\\|PricingParameters\\)>\\([^<]+\\)" 'hi-yellow 3) + (highlight-regexp "<\\([[:alnum:]]+:\\)?\\(ActionCode\\|InputEntry\\|PricingParameters\\|FullText\\)>\\([^<]+\\)" 'hi-yellow 3) (highlight-phrase "\\(?:isPast\\|isExpired\\|itineraryChange\\)=\"[^\"]+\"" 'hi-green) (highlight-regexp "\\(?:ResBookDesigCode\\|Status\\|FlightNumber\\|ArrivalDateTime\\|DepartureDateTime\\|FareBasisCode\\|passengerType\\)=\"\\([^\"]+\\)\"" 'hi-green 1) (highlight-phrase "InputMessage=" 'hi-blue))