# HG changeset patch
# User Oleksandr Gavenko <gavenkoa@gmail.com>
# Date 1630833431 -10800
# Node ID b7d3a5fd4059b3de6a056c51f65d601c75a94965
# Parent  45cfecc51e506b6c36389a1634362cc21f9cc156
Added more Sabre attributes for highlighting.

diff -r 45cfecc51e50 -r b7d3a5fd4059 mylisp/gds-sabre.el
--- a/mylisp/gds-sabre.el	Tue Aug 31 15:39:32 2021 +0300
+++ b/mylisp/gds-sabre.el	Sun Sep 05 12:17:11 2021 +0300
@@ -24,9 +24,9 @@
   (highlight-regexp " \\(?:[[:alpha:]_]*PseudoCityCode\\|CreationAgent\\|BookingSource\\|AgentSine\\)=\"\\([^\"]+\\)\"" 'hi-pink 1)
   (highlight-regexp "<\\([[:alnum:]]*:?\\)\\(RecordLocator\\|DepartureAirport\\|ArrivalAirport\\|MarketingAirlineCode\\|MarketingFlightNumber\\)>\\([^<]+\\)</\\1\\2>" 'hi-pink 3)
   (highlight-phrase ":Arunk\\|:FlightSegment\\>\\|:FareBasis\\>" 'hi-pink)
-  (highlight-regexp "<\\([[:alnum:]]+:\\)?\\(ActionCode\\|InputEntry\\|PricingParameters\\|FullText\\)>\\([^<]+\\)</\\1?\\2>" 'hi-yellow 3)
+  (highlight-regexp "<\\([[:alnum:]]+:\\)?\\(ActionCode\\|ClassOfService\\|MarketingClassOfService\\|InputEntry\\|PricingParameters\\|FullText\\)>\\([^<]+\\)</\\1?\\2>" 'hi-yellow 3)
   (highlight-phrase "\\(?:isPast\\|isExpired\\|itineraryChange\\|latestPQFlag\\)=\"[^\"]+\"" 'hi-green)
-  (highlight-regexp "\\(?:ResBookDesigCode\\|Status\\|FlightNumber\\|ArrivalDateTime\\|DepartureDateTime\\|FareBasisCode\\|passengerType\\)=\"\\([^\"]+\\)\"" 'hi-green 1)
+  (highlight-regexp "\\(?:ResBookDesigCode\\|Status\\|FlightNumber\\|ArrivalDateTime\\|DepartureDateTime\\|FareBasisCode\\|passengerType\\|sequence\\)=\"\\([^\"]+\\)\"" 'hi-green 1)
   (highlight-phrase "InputMessage=" 'hi-blue))
 
 (defvar gds-sabre-highlight-ssrs