X-Git-Url: http://gitweb.michael.orlitzky.com/?p=nagios-mode.git;a=blobdiff_plain;f=nagios-mode.el;h=097e331e6aef5f628dbb24ddf844c084c3b7dc76;hp=c56d58dd914b8a644a335c6f68a92924f16170e5;hb=HEAD;hpb=e8d77bf664c2f1509bc61c618fcc1b82d631c1bc diff --git a/nagios-mode.el b/nagios-mode.el index c56d58d..0dd0773 100644 --- a/nagios-mode.el +++ b/nagios-mode.el @@ -1,23 +1,18 @@ -;; -;; nagios-mode, an Emacs mode for Nagios -;; configuration files. -;; -;; Copyright Michael Orlitzky -;; -;; http://michael.orlitzky.com/ +;; nagios-mode: an emacs mode for nagios configuration files +;; Copyright (C) 2024 Michael Orlitzky ;; ;; This program is free software: you can redistribute it and/or modify -;; it under the terms of the GNU General Public License as published by -;; the Free Software Foundation, either version 3 of the License, or -;; (at your option) any later version. +;; it under the terms of the GNU Affero General Public License as +;; published by the Free Software Foundation, either version 3 of the +;; License, or (at your option) any later version. ;; ;; This program is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of -;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -;; GNU General Public License for more details. -;; -;; http://www.fsf.org/licensing/licenses/gpl.html +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU Affero General Public License for more details. ;; +;; You should have received a copy of the GNU Affero General Public License +;; along with this program. If not, see . (require 'font-lock) (require 'regexp-opt) @@ -242,31 +237,124 @@ (concat "^[ \t\r\n]*" (regexp-opt - '("active_checks_enabled" "address" "alias" "check_command" - "check_freshness" "check_interval" "check_period" "checks_enabled" - "command_line" "command_name" "contactgroups" "contact_groups" - "contactgroup_members" "contact_name" "contactgroup_name" "contacts" - "dependent_host_name" "dependent_service_description" "email" - "event_handler" "event_handler_enabled" "execution_failure_criteria" - "failure_prediction_enabled" "first_notification" - "first_notification_delay" "flap_detection_enabled" "freshness_threshold" - "friday" "high_flap_threshold" "host_name" "host_notification_commands" - "host_notification_options" "host_notification_period" - "host_notifications_enabled" "hostgroup_name" "hostgroups" - "is_volatile" "last_notification" "low_flap_threshold" - "max_check_attempts" "members" "monday" "normal_check_interval" - "notes" "notification_failure_criteria" - "notification_interval" "notification_options" - "notification_period" "notifications_enabled" - "obsess_over_service" "pager" "parallelize_check" - "parents" "passive_checks_enabled" - "process_perf_data" "retain_nonstatus_information" - "retain_status_information" "retry_check_interval" - "retry_interval" "saturday" "service_description" - "service_notification_commands" "service_notification_options" - "service_notification_period" "service_notifications_enabled" - "servicegroup_name" "stalking_options" - "sunday" "thursday" "timeperiod_name" "tuesday" "wednesday") t) + '("action_url" + "active_checks_enabled" + "address" + "alias" + "can_submit_commands" + "check_command" + "check_freshness" + "check_interval" + "check_period" + "checks_enabled" + "command_line" + "command_name" + "contact_groups" + "contact_name" + "contactgroup_members" + "contactgroup_name" + "contactgroups" + "contacts" + "dependency_period" + "dependent_description" + "dependent_host" + "dependent_host_name" + "dependent_hostgroup" + "dependent_hostgroup_name" + "dependent_hostgroups" + "dependent_service_description" + "dependent_servicegroup" + "dependent_servicegroup_name" + "dependent_servicegroups" + "description" + "display_name" + "email" + "escalation_options" + "escalation_period" + "event_handler" + "event_handler_enabled" + "exclude" + "execution_failure_criteria" + "execution_failure_options" + "failure_prediction_enabled" + "failure_prediction_options" + "first_notification" + "first_notification_delay" + "flap_detection_enabled" + "flap_detection_options" + "freshness_threshold" + "friday" + "high_flap_threshold" + "host" + "host_groups" + "host_name" + "host_notification_commands" + "host_notification_options" + "host_notification_period" + "host_notifications_enabled" + "hostgroup" + "hostgroup_members" + "hostgroup_name" + "hostgroups" + "hosts" + "hourly_value" + "icon_image" + "icon_image_alt" + "importance" + "inherits_parent" + "initial_state" + "is_volatile" + "last_notification" + "low_flap_threshold" + "master_description" + "master_host" + "master_host_name" + "master_service_description" + "max_check_attempts" + "members" + "minimum_importance" + "minimum_value" + "monday" + "normal_check_interval" + "notes" + "notes_url" + "notification_failure_criteria" + "notification_failure_options" + "notification_interval" + "notification_options" + "notification_period" + "notifications_enabled" + "obsess" + "obsess_over_host" + "obsess_over_service" + "pager" + "parallelize_check" + "parents" + "passive_checks_enabled" + "process_perf_data" + "retain_nonstatus_information" + "retain_status_information" + "retry_check_interval" + "retry_interval" + "saturday" + "service_description" + "service_groups" + "service_notification_commands" + "service_notification_options" + "service_notification_period" + "service_notifications_enabled" + "servicegroup" + "servicegroup_members" + "servicegroup_name" + "servicegroups" + "stalking_options" + "statusmap_image" + "sunday" + "thursday" + "timeperiod_name" + "tuesday" + "vrml_image" + "wednesday") t) "[ \r\n\t]+") ) @@ -816,7 +904,6 @@ (make-local-variable 'comment-start-skip) (make-local-variable 'comment-end) (make-local-variable 'indent-line-function) - (make-local-variable 'syntax-begin-function) (set-syntax-table nagios-mode-syntax-table) @@ -827,11 +914,6 @@ comment-start "#" comment-start-skip "#\|; +" comment-end "" - - ;; Since comments and strings do not span multiple lines, - ;; the syntax parser can safely start parsing at the beginning - ;; of any line. - syntax-begin-function 'beginning-of-line ) ;; Keyboard Mapping