# HG changeset patch # User Oleksandr Gavenko # Date 1624443886 -10800 # Node ID bd09520467ad4b26c8335b3df481b566185bece8 # Parent b4c49ef014e205baa9f8d809e9c44ece854c140e Updated Sabre XML entries to highlight. diff -r b4c49ef014e2 -r bd09520467ad mylisp/gds-sabre.el --- a/mylisp/gds-sabre.el Wed Jun 23 11:19:45 2021 +0300 +++ b/mylisp/gds-sabre.el Wed Jun 23 13:24:46 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 "<\\(InputEntry\\|PricingParameters\\)>\\([^<]+\\)" 'hi-yellow 2) + (highlight-regexp "<\\([[:alnum:]]*:?\\)\\(ActionCode\\|InputEntry\\|PricingParameters\\)>\\([^<]+\\)" '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))