diff --git a/puml-mode.el b/puml-mode.el index 472a444..a231466 100644 --- a/puml-mode.el +++ b/puml-mode.el @@ -28,6 +28,7 @@ ;;; Change log: ;; +;; Version 0.6.7, 2016-10-11 Added deprecation warning in favor of plantuml-mode ;; version 0.6.6, 2016-07-19 Added autoload, minor bug fixes ;; version 0.6.5, 2016-03-24 Added UTF8 support and open in new window / frame shortcuts ;; version 0.6.4, 2015-12-12 Added support for comments (single and multiline) -- thanks to https://github.com/nivekuil @@ -54,7 +55,7 @@ (defvar puml-mode-hook nil "Standard hook for puml-mode.") -(defconst puml-mode-version "0.6.5" "The puml-mode version string.") +(defconst puml-mode-version "0.6.7" "The puml-mode version string.") (defvar puml-mode-debug-enabled nil) @@ -120,6 +121,7 @@ (defun puml-init () "Initialize the keywords or builtins from the cmdline language output." + (display-warning :warning "`puml-mode' is deprecated in favor of `plantuml-mode', make sure to update your configuration") (unless (file-exists-p puml-plantuml-jar-path) (error "Could not find plantuml.jar at %s" puml-plantuml-jar-path)) (with-temp-buffer @@ -340,7 +342,17 @@ Shortcuts Command Name (set (make-local-variable 'comment-end) "'/") (set (make-local-variable 'comment-multi-line) t) (set (make-local-variable 'comment-style) 'extra-line) - (setq font-lock-defaults '((puml-font-lock-keywords) nil t))) + (setq font-lock-defaults '((puml-font-lock-keywords) nil t)) + + ; Run hooks: + (run-mode-hooks 'puml-mode-hook)) + +(defun puml-deprecation-warning () + "Warns the user about the deprecation of the `puml-mode' project." + (display-warning :warning + "`puml-mode' is now deprecated and no longer updated, you should move your configuration to use `plantuml-mode'. See https://github.com/sytac/plantuml-mode.")) + +(add-hook 'puml-mode-hook 'puml-deprecation-warning) (provide 'puml-mode) ;;; puml-mode.el ends here