Fixed highlighting of some Sabre XML tags when they are without XML namespace.
authorOleksandr Gavenko <gavenkoa@gmail.com>
Tue, 31 Aug 2021 15:39:03 +0300
changeset 1745 30584ca279db
parent 1744 ef4030540143
child 1746 45cfecc51e50
Fixed highlighting of some Sabre XML tags when they are without XML namespace.
mylisp/gds-sabre.el
--- a/mylisp/gds-sabre.el	Wed Aug 04 16:41:03 2021 +0300
+++ b/mylisp/gds-sabre.el	Tue Aug 31 15:39:03 2021 +0300
@@ -24,8 +24,8 @@
   (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-phrase "\\(?:isPast\\|isExpired\\|itineraryChange\\)=\"[^\"]+\"" 'hi-green)
+  (highlight-regexp "<\\([[:alnum:]]+:\\)?\\(ActionCode\\|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-phrase "InputMessage=" 'hi-blue))