emacs.el

(defun sass-convert-region (beg end)
  "Convierte la región seleccionada a código sass"
  (interactive "r")
  (let ((comando "/usr/local/bin/css2sass -s"))
  (shell-command-on-region beg end comando (buffer-name) t)))

(defun sass-convert-buffer ()
  "Convierte el buffer seleccionado a código sass"
  (interactive)
  (let ((nuevoarchivo
	 (replace-regexp-in-string "css$" "sass" (buffer-file-name))))
     (sass-convert-region (point-min) (point-max))
     (write-file nuevoarchivo)))