Mercurial Mercurial > dot-emacs / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Updated Sabre XML entries to highlight.
authorOleksandr Gavenko <gavenkoa@gmail.com>
Wed, 23 Jun 2021 13:24:46 +0300
changeset 1737 bd09520467ad
parent 1736 b4c49ef014e2
child 1738 1f9eaaf10690
Updated Sabre XML entries to highlight.
mylisp/gds-sabre.el file | annotate | diff | comparison | revisions 
--- 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\\)>\\([^<]+\\)</\\1\\2>" 'hi-pink 3)
   (highlight-phrase ":Arunk\\|:FlightSegment\\>\\|:FareBasis\\>" 'hi-pink)
-  (highlight-regexp "<\\(InputEntry\\|PricingParameters\\)>\\([^<]+\\)</\\1>" 'hi-yellow 2)
+  (highlight-regexp "<\\([[:alnum:]]*:?\\)\\(ActionCode\\|InputEntry\\|PricingParameters\\)>\\([^<]+\\)</\\1\\2>" '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))
dot-emacs