X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;ds=inline;f=nagios-mode.el;h=097e331e6aef5f628dbb24ddf844c084c3b7dc76;hb=HEAD;hp=c56d58dd914b8a644a335c6f68a92924f16170e5;hpb=e8d77bf664c2f1509bc61c618fcc1b82d631c1bc;p=nagios-mode.git
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