From 9df6bb4922d08a9db2233f738b691eebc6e3120a Mon Sep 17 00:00:00 2001 From: Tom Willemsen Date: Wed, 15 Jun 2011 12:19:30 +0200 Subject: EMACS: compile, htmlize, js, stumpwm * install.sh tries to compile emacs.el before linking the emacs.elc to ~/. This is to always have a compiled .emacs.elc for speediest startup. * I removed a little bit of code from htmlize.el that was causing trouble with the naquadah theme. * I removed javascript-mode, because the built-in js-mode is better. * I Added stumpwm mode * When I save a file and it is in html-mode it will try and replace all occurrences of é with é before continueing. --- emacs.d/elisp/htmlize.el | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'emacs.d/elisp/htmlize.el') diff --git a/emacs.d/elisp/htmlize.el b/emacs.d/elisp/htmlize.el index f3a13f6..2b1d9a7 100644 --- a/emacs.d/elisp/htmlize.el +++ b/emacs.d/elisp/htmlize.el @@ -581,7 +581,7 @@ without modifying their meaning." (goto-char (point-min)) (while (search-forward "Local Variables:" nil t) (replace-match "Local Variables:" nil t))) - + ;;; Color handling. @@ -744,7 +744,7 @@ If no rgb.txt file is found, return nil." (t ;; We're getting the RGB components from Emacs. (let ((rgb - ;; Here I cannot conditionalize on (fboundp ...) + ;; Here I cannot conditionalize on (fboundp ...) ;; because ps-print under some versions of GNU Emacs ;; defines its own dummy version of ;; `color-instance-rgb-components'. @@ -880,10 +880,10 @@ If no rgb.txt file is found, return nil." (setq face (face-attribute face :inherit))) (face-attribute face attr))))) (when (and value (not (eq value 'unspecified))) - (htmlize-face-emacs21-attr fstruct attr value)))) - (let ((size (htmlize-face-size face))) - (unless (eql size 1.0) ; ignore non-spec - (setf (htmlize-fstruct-size fstruct) size)))) + (htmlize-face-emacs21-attr fstruct attr value))))) + ;(let ((size (htmlize-face-size face))) + ; (unless (eql size 1.0) ; ignore non-spec + ; (setf (htmlize-fstruct-size fstruct) size)))) (setf (htmlize-fstruct-css-name fstruct) (htmlize-face-css-name face)) fstruct)) @@ -1148,7 +1148,7 @@ property and by buffer overlays that specify `face'." ;; `insert-head', `body-tag', and `insert-text'. Not all output types ;; define all methods. ;; -;; Methods are called either with (htmlize-method METHOD ARGS...) +;; Methods are called either with (htmlize-method METHOD ARGS...) ;; special form, or by accessing the function with ;; (htmlize-method-function 'METHOD) and calling (funcall FUNCTION). ;; The latter form is useful in tight loops because `htmlize-method' @@ -1303,7 +1303,7 @@ it's called with the same value of KEY. All other times, the cached (format "" (htmlize-fstruct-foreground fstruct) (htmlize-fstruct-background fstruct)))) - + (defun htmlize-font-insert-text (text fstruct-list buffer) ;; In `font' mode, we use the traditional HTML means of altering ;; presentation: tag for colors, for bold, for -- cgit v1.2.3-54-g00ecf