summaryrefslogtreecommitdiff
path: root/init.el
diff options
context:
space:
mode:
authorbenj <benj@rse8.com>2021-06-15 10:35:32 -0700
committerbenj <benj@rse8.com>2021-06-15 10:35:32 -0700
commiteede51f9c8b38fae1945a07bdd6d4edb67d703b6 (patch)
tree0bfb0badbac1a14daedf575152af729f7a02675d /init.el
parent263402317c4ab87688ff0a594ddb939201dfd9ea (diff)
downloademacs-eede51f9c8b38fae1945a07bdd6d4edb67d703b6.tar
emacs-eede51f9c8b38fae1945a07bdd6d4edb67d703b6.tar.gz
emacs-eede51f9c8b38fae1945a07bdd6d4edb67d703b6.tar.bz2
emacs-eede51f9c8b38fae1945a07bdd6d4edb67d703b6.tar.lz
emacs-eede51f9c8b38fae1945a07bdd6d4edb67d703b6.tar.xz
emacs-eede51f9c8b38fae1945a07bdd6d4edb67d703b6.tar.zst
emacs-eede51f9c8b38fae1945a07bdd6d4edb67d703b6.zip
- remove startup hack for backwards incompatible changes
- remove company-lsp
Diffstat (limited to 'init.el')
-rw-r--r--init.el94
1 files changed, 0 insertions, 94 deletions
diff --git a/init.el b/init.el
index d6439ae..4886877 100644
--- a/init.el
+++ b/init.el
@@ -1,96 +1,3 @@
-(defun make-obsolete (obsolete-name current-name &optional when)
- "Make the byte-compiler warn that function OBSOLETE-NAME is obsolete.
-OBSOLETE-NAME should be a function name or macro name (a symbol).
-
-The warning will say that CURRENT-NAME should be used instead.
-If CURRENT-NAME is a string, that is the `use instead' message
-\(it should end with a period, and not start with a capital).
-WHEN should be a string indicating when the function
-was first made obsolete, for example a date or a release number."
- (declare (advertised-calling-convention
- ;; New code should always provide the `when' argument.
- (obsolete-name current-name when) "23.1"))
- (put obsolete-name 'byte-obsolete-info
- ;; The second entry used to hold the `byte-compile' handler, but
- ;; is not used any more nowadays.
- (purecopy (list current-name nil when)))
- obsolete-name)
-
-(defmacro define-obsolete-function-alias (obsolete-name current-name
- &optional when docstring)
- "Set OBSOLETE-NAME's function definition to CURRENT-NAME and mark it obsolete.
-
-\(define-obsolete-function-alias \\='old-fun \\='new-fun \"22.1\" \"old-fun's doc.\")
-
-is equivalent to the following two lines of code:
-
-\(defalias \\='old-fun \\='new-fun \"old-fun's doc.\")
-\(make-obsolete \\='old-fun \\='new-fun \"22.1\")
-
-WHEN should be a string indicating when the function was first
-made obsolete, for example a date or a release number.
-
-See the docstrings of `defalias' and `make-obsolete' for more details."
- (declare (doc-string 4)
- (advertised-calling-convention
- ;; New code should always provide the `when' argument.
- (obsolete-name current-name when &optional docstring) "23.1"))
- `(progn
- (defalias ,obsolete-name ,current-name ,docstring)
- (make-obsolete ,obsolete-name ,current-name ,when)))
-
-(defun make-obsolete-variable (obsolete-name current-name &optional when access-type)
- "Make the byte-compiler warn that OBSOLETE-NAME is obsolete.
-The warning will say that CURRENT-NAME should be used instead.
-If CURRENT-NAME is a string, that is the `use instead' message.
-WHEN should be a string indicating when the variable
-was first made obsolete, for example a date or a release number.
-ACCESS-TYPE if non-nil should specify the kind of access that will trigger
- obsolescence warnings; it can be either `get' or `set'."
- (declare (advertised-calling-convention
- ;; New code should always provide the `when' argument.
- (obsolete-name current-name when &optional access-type) "23.1"))
- (put obsolete-name 'byte-obsolete-variable
- (purecopy (list current-name access-type when)))
- obsolete-name)
-
-(defmacro define-obsolete-variable-alias (obsolete-name current-name
- &optional when docstring)
- "Make OBSOLETE-NAME a variable alias for CURRENT-NAME and mark it obsolete.
-This uses `defvaralias' and `make-obsolete-variable' (which see).
-See the Info node `(elisp)Variable Aliases' for more details.
-
-If CURRENT-NAME is a defcustom or a defvar (more generally, any variable
-where OBSOLETE-NAME may be set, e.g. in an init file, before the
-alias is defined), then the define-obsolete-variable-alias
-statement should be evaluated before the defcustom, if user
-customizations are to be respected. The simplest way to achieve
-this is to place the alias statement before the defcustom (this
-is not necessary for aliases that are autoloaded, or in files
-dumped with Emacs). This is so that any user customizations are
-applied before the defcustom tries to initialize the
-variable (this is due to the way `defvaralias' works).
-
-WHEN should be a string indicating when the variable was first
-made obsolete, for example a date or a release number.
-
-For the benefit of Customize, if OBSOLETE-NAME has
-any of the following properties, they are copied to
-CURRENT-NAME, if it does not already have them:
-`saved-value', `saved-variable-comment'."
- (declare (doc-string 4)
- (advertised-calling-convention
- ;; New code should always provide the `when' argument.
- (obsolete-name current-name when &optional docstring) "23.1"))
- `(progn
- (defvaralias ,obsolete-name ,current-name ,docstring)
- ;; See Bug#4706.
- (dolist (prop '(saved-value saved-variable-comment))
- (and (get ,obsolete-name prop)
- (null (get ,current-name prop))
- (put ,current-name prop (get ,obsolete-name prop))))
- (make-obsolete-variable ,obsolete-name ,current-name ,when)))
-
;;; init.el --- initialize emacs configuration
;;; Author: Benj Bellon <benjaminbellon@gmail.com>
@@ -147,7 +54,6 @@ CURRENT-NAME, if it does not already have them:
company
company-c-headers
company-glsl
- company-lsp
company-terraform
clojure-mode
clojure-mode-extra-font-locking