FUEL: Compatibility functions for Emacs 24.2.

db4
Björn Lindqvist 2013-07-13 19:13:39 +02:00
parent ec1ecbe549
commit 1358a9eb55
3 changed files with 15 additions and 2 deletions

View File

@ -20,8 +20,8 @@
(require 'thingatpt)
(require 'font-lock)
(require 'ring)
(require 'fuel-base)
;;; Customization:
;;;###autoload

View File

@ -31,6 +31,16 @@
;;; Utilities:
(unless (fboundp 'setq-local)
(defmacro setq-local (var val)
(list 'set (list 'make-local-variable (list 'quote var)) val)))
(unless (fboundp 'defvar-local)
(defmacro defvar-local (var val &optional docstring)
(declare (debug defvar) (doc-string 3))
(list 'progn (list 'defvar var val docstring)
(list 'make-variable-buffer-local (list 'quote var)))))
(defun fuel-shorten-str (str len)
(let ((sl (length str)))
(if (<= sl len) str

View File

@ -1 +1,4 @@
(define-package "fuel" "1.1" "Major mode for the Factor programming language.")
(define-package
"fuel" "1.1"
"Major mode for the Factor programming language."
'((cl-lib "0.2") (emacs "24.2")))