Permalink
Browse files

emacs-rails: fix line endings

  • Loading branch information...
1 parent a5344c4 commit 5ca8e052f1b9604b72be817732e4d4d01be26a6e @davidswelt committed Sep 12, 2012
Showing with 5,949 additions and 5,949 deletions.
  1. +114 −114 aquamacs/src/site-lisp/edit-modes/emacs-rails/inflections.el
  2. +69 −69 aquamacs/src/site-lisp/edit-modes/emacs-rails/predictive-prog-mode.el
  3. +4 −4 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-bytecompile.el
  4. +120 −120 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-cmd-proxy.el
  5. +88 −88 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-compat.el
  6. +216 −216 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-controller-layout.el
  7. +37 −37 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-controller-minor-mode.el
  8. +635 −635 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-core.el
  9. +44 −44 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-features.el
  10. +53 −53 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-find.el
  11. +35 −35 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-fixture-minor-mode.el
  12. +145 −145 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-for-controller.el
  13. +55 −55 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-for-functional-test.el
  14. +53 −53 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-for-helper.el
  15. +31 −31 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-for-layout.el
  16. +50 −50 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-for-plugin.el
  17. +144 −144 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-for-view.el
  18. +38 −38 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-functional-test-minor-mode.el
  19. +35 −35 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-helper-minor-mode.el
  20. +35 −35 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-layout-minor-mode.el
  21. +406 −406 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-lib.el
  22. +78 −78 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-log.el
  23. +37 −37 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-mailer-minor-mode.el
  24. +35 −35 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-migration-minor-mode.el
  25. +130 −130 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-model-layout.el
  26. +35 −35 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-model-minor-mode.el
  27. +282 −282 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-navigation.el
  28. +54 −54 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-plugin-minor-mode.el
  29. +72 −72 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-project.el
  30. +97 −97 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-rake.el
  31. +162 −162 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-ruby.el
  32. +323 −323 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-scripts.el
  33. +459 −459 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-snippets-feature.el
  34. +292 −292 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-snippets.el
  35. +167 −167 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-speedbar-feature.el
  36. +166 −166 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-test.el
  37. +299 −299 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-ui.el
  38. +42 −42 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-unit-test-minor-mode.el
  39. +114 −114 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-view-minor-mode.el
  40. +190 −190 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails-ws.el
  41. +452 −452 aquamacs/src/site-lisp/edit-modes/emacs-rails/rails.el
  42. +56 −56 aquamacs/src/site-lisp/edit-modes/emacs-rails/untabify-file.el
@@ -1,114 +1,114 @@
-;;; inflections.el ---
-
-;; Copyright (C) 2006 Dmitry Galinsky <dima dot exe at gmail dot com>
-
-;; Authors: Dmitry Galinsky <dima dot exe at gmail dot com>,
-;; Howard Yeh <hayeah at gmail dot com>
-
-;; Keywords: ruby rails languages oop
-;; $URL: svn+ssh://rubyforge/var/svn/emacs-rails/trunk/inflections.el $
-;; $Id: inflections.el,v 1.1 2007/08/02 12:32:36 davidswelt Exp $
-
-;;; License
-
-;; This program is free software; you can redistribute it and/or
-;; modify it under the terms of the GNU General Public License
-;; as published by the Free Software Foundation; either version 2
-;; of the License, or (at your option) any later version.
-
-;; This program is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with this program; if not, write to the Free Software
-;; Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-
-;;; Code:
-
-(defvar inflection-singulars nil)
-(defvar inflection-plurals nil)
-(defvar inflection-irregulars nil)
-(defvar inflection-uncountables nil)
-
-(defmacro define-inflectors (&rest specs)
- (loop for (type . rest) in specs do
- (case type
- (:singular (push rest inflection-singulars))
- (:plural (push rest inflection-plurals))
- (:irregular (push rest inflection-irregulars))
- (:uncountable (setf inflection-uncountables
- (append rest inflection-uncountables))))))
-
-(define-inflectors
- (:plural "$" "s")
- (:plural "s$" "s")
- (:plural "\\(ax\\|test\\)is$" "\\1es")
- (:plural "\\(octop\\|vir\\)us$" "\\1i")
- (:plural "\\(alias\\|status\\)$" "\\1es")
- (:plural "\\(bu\\)s$" "\\1ses")
- (:plural "\\(buffal\\|tomat\\)o$" "\\1oes")
- (:plural "\\([ti]\\)um$" "\\1a")
- (:plural "sis$" "ses")
- (:plural "\\(?:\\([^f]\\)fe\\|\\([lr]\\)f\\)$" "\\1\\2ves")
- (:plural "\\(hive\\)$" "\\1s")
- (:plural "\\([^aeiouy]\\|qu\\)y$" "\\1ies")
- (:plural "\\(x\\|ch\\|ss\\|sh\\)$" "\\1es")
- (:plural "\\(matr\\|vert\\|ind\\)ix\\|ex$" "\\1ices")
- (:plural "\\([m\\|l]\\)ouse$" "\\1ice")
- (:plural "^\\(ox\\)$" "\\1en")
- (:plural "\\(quiz\\)$" "\\1zes")
-
- (:singular "s$" "")
- (:singular "\\(n\\)ews$" "\\1ews")
- (:singular "\\([ti]\\)a$" "\\1um")
- (:singular "\\(\\(a\\)naly\\|\\(b\\)a\\|\\(d\\)iagno\\|\\(p\\)arenthe\\|\\(p\\)rogno\\|\\(s\\)ynop\\|\\(t\\)he\\)ses$" "\\1\\2sis")
- (:singular "\\(^analy\\)ses$" "\\1sis")
- (:singular "\\([^f]\\)ves$" "\\1fe")
- (:singular "\\(hive\\)s$" "\\1")
- (:singular "\\(tive\\)s$" "\\1")
- (:singular "\\([lr]\\)ves$" "\\1f")
- (:singular "\\([^aeiouy]\\|qu\\)ies$" "\\1y")
- (:singular "\\(s\\)eries$" "\\1eries")
- (:singular "\\(m\\)ovies$" "\\1ovie")
- (:singular "\\(x\\|ch\\|ss\\|sh\\)es$" "\\1")
- (:singular "\\([m\\|l]\\)ice$" "\\1ouse")
- (:singular "\\(bus\\)es$" "\\1")
- (:singular "\\(o\\)es$" "\\1")
- (:singular "\\(shoe\\)s$" "\\1")
- (:singular "\\(cris\\|ax\\|test\\)es$" "\\1is")
- (:singular "\\(octop\\|vir\\)i$" "\\1us")
- (:singular "\\(alias\\|status\\)es$" "\\1")
- (:singular "^\\(ox\\)en" "\\1")
- (:singular "\\(vert\\|ind\\)ices$" "\\1ex")
- (:singular "\\(matr\\)ices$" "\\1ix")
- (:singular "\\(quiz\\)zes$" "\\1")
-
- (:irregular "person" "people")
- (:irregular "man" "men")
- (:irregular "child" "children")
- (:irregular "sex" "sexes")
- (:irregular "move" "moves")
-
- (:uncountable "equipment" "information" "rice" "money" "species" "series" "fish" "sheep"))
-
-(defun singularize-string (str)
- (when (stringp str)
- (or (car (member str inflection-uncountables))
- (caar (member* str inflection-irregulars :key 'cadr :test 'equal))
- (loop for (from to) in inflection-singulars
- for singular = (string=~ from str (sub to))
- when singular do (return singular))
- str)))
-
-(defun pluralize-string (str)
- (when (stringp str)
- (or (car (member str inflection-uncountables))
- (cadar (member* str inflection-irregulars :key 'car :test 'equal))
- (loop for (from to) in inflection-plurals
- for plurals = (string=~ from str (sub to))
- when plurals do (return plurals))
- str)))
-
-(provide 'inflections)
+;;; inflections.el ---
+
+;; Copyright (C) 2006 Dmitry Galinsky <dima dot exe at gmail dot com>
+
+;; Authors: Dmitry Galinsky <dima dot exe at gmail dot com>,
+;; Howard Yeh <hayeah at gmail dot com>
+
+;; Keywords: ruby rails languages oop
+;; $URL: svn+ssh://rubyforge/var/svn/emacs-rails/trunk/inflections.el $
+;; $Id: inflections.el,v 1.1 2007/08/02 12:32:36 davidswelt Exp $
+
+;;; License
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 2
+;; of the License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program; if not, write to the Free Software
+;; Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+
+;;; Code:
+
+(defvar inflection-singulars nil)
+(defvar inflection-plurals nil)
+(defvar inflection-irregulars nil)
+(defvar inflection-uncountables nil)
+
+(defmacro define-inflectors (&rest specs)
+ (loop for (type . rest) in specs do
+ (case type
+ (:singular (push rest inflection-singulars))
+ (:plural (push rest inflection-plurals))
+ (:irregular (push rest inflection-irregulars))
+ (:uncountable (setf inflection-uncountables
+ (append rest inflection-uncountables))))))
+
+(define-inflectors
+ (:plural "$" "s")
+ (:plural "s$" "s")
+ (:plural "\\(ax\\|test\\)is$" "\\1es")
+ (:plural "\\(octop\\|vir\\)us$" "\\1i")
+ (:plural "\\(alias\\|status\\)$" "\\1es")
+ (:plural "\\(bu\\)s$" "\\1ses")
+ (:plural "\\(buffal\\|tomat\\)o$" "\\1oes")
+ (:plural "\\([ti]\\)um$" "\\1a")
+ (:plural "sis$" "ses")
+ (:plural "\\(?:\\([^f]\\)fe\\|\\([lr]\\)f\\)$" "\\1\\2ves")
+ (:plural "\\(hive\\)$" "\\1s")
+ (:plural "\\([^aeiouy]\\|qu\\)y$" "\\1ies")
+ (:plural "\\(x\\|ch\\|ss\\|sh\\)$" "\\1es")
+ (:plural "\\(matr\\|vert\\|ind\\)ix\\|ex$" "\\1ices")
+ (:plural "\\([m\\|l]\\)ouse$" "\\1ice")
+ (:plural "^\\(ox\\)$" "\\1en")
+ (:plural "\\(quiz\\)$" "\\1zes")
+
+ (:singular "s$" "")
+ (:singular "\\(n\\)ews$" "\\1ews")
+ (:singular "\\([ti]\\)a$" "\\1um")
+ (:singular "\\(\\(a\\)naly\\|\\(b\\)a\\|\\(d\\)iagno\\|\\(p\\)arenthe\\|\\(p\\)rogno\\|\\(s\\)ynop\\|\\(t\\)he\\)ses$" "\\1\\2sis")
+ (:singular "\\(^analy\\)ses$" "\\1sis")
+ (:singular "\\([^f]\\)ves$" "\\1fe")
+ (:singular "\\(hive\\)s$" "\\1")
+ (:singular "\\(tive\\)s$" "\\1")
+ (:singular "\\([lr]\\)ves$" "\\1f")
+ (:singular "\\([^aeiouy]\\|qu\\)ies$" "\\1y")
+ (:singular "\\(s\\)eries$" "\\1eries")
+ (:singular "\\(m\\)ovies$" "\\1ovie")
+ (:singular "\\(x\\|ch\\|ss\\|sh\\)es$" "\\1")
+ (:singular "\\([m\\|l]\\)ice$" "\\1ouse")
+ (:singular "\\(bus\\)es$" "\\1")
+ (:singular "\\(o\\)es$" "\\1")
+ (:singular "\\(shoe\\)s$" "\\1")
+ (:singular "\\(cris\\|ax\\|test\\)es$" "\\1is")
+ (:singular "\\(octop\\|vir\\)i$" "\\1us")
+ (:singular "\\(alias\\|status\\)es$" "\\1")
+ (:singular "^\\(ox\\)en" "\\1")
+ (:singular "\\(vert\\|ind\\)ices$" "\\1ex")
+ (:singular "\\(matr\\)ices$" "\\1ix")
+ (:singular "\\(quiz\\)zes$" "\\1")
+
+ (:irregular "person" "people")
+ (:irregular "man" "men")
+ (:irregular "child" "children")
+ (:irregular "sex" "sexes")
+ (:irregular "move" "moves")
+
+ (:uncountable "equipment" "information" "rice" "money" "species" "series" "fish" "sheep"))
+
+(defun singularize-string (str)
+ (when (stringp str)
+ (or (car (member str inflection-uncountables))
+ (caar (member* str inflection-irregulars :key 'cadr :test 'equal))
+ (loop for (from to) in inflection-singulars
+ for singular = (string=~ from str (sub to))
+ when singular do (return singular))
+ str)))
+
+(defun pluralize-string (str)
+ (when (stringp str)
+ (or (car (member str inflection-uncountables))
+ (cadar (member* str inflection-irregulars :key 'car :test 'equal))
+ (loop for (from to) in inflection-plurals
+ for plurals = (string=~ from str (sub to))
+ when plurals do (return plurals))
+ str)))
+
+(provide 'inflections)
@@ -1,69 +1,69 @@
-;;; predictive-prog-mode.el ---
-
-;; Copyright (C) 2006 Dmitry Galinsky <dima dot exe at gmail dot com>
-
-;; Authors: Dmitry Galinsky <dima dot exe at gmail dot com>,
-
-;; Keywords: ruby rails languages oop
-;; $URL: svn+ssh://rubyforge/var/svn/emacs-rails/trunk/rails.el $
-;; $Id: predictive-prog-mode.el,v 1.1 2007/08/02 12:32:36 davidswelt Exp $
-
-;;; License
-
-;; This program is free software; you can redistribute it and/or
-;; modify it under the terms of the GNU General Public License
-;; as published by the Free Software Foundation; either version 2
-;; of the License, or (at your option) any later version.
-
-;; This program is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with this program; if not, write to the Free Software
-;; Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-
-;;; Code:
-
-(eval-when-compile
- (require 'predictive nil t)
- (require 'completion-ui nil t))
-
-(require 'flyspell)
-
-(defconst predictive-prog-text-faces
- '(font-lock-comment-face font-lock-doc-face)
- "Faces corresponding to text in programming-mode buffers.")
-
-(defvar predictive-prog-mode-main-dict nil)
-
-(defun activate-predictive-inside-comments (start end len)
- "Looking at symbol at point and activate the `predictive-mode'
-if there a string or a comment."
- (save-excursion
- (let ((p (get-text-property (- (point) 1) 'face))
- (f (get-text-property (point) 'face)))
- (if (or (memq f predictive-prog-text-faces)
- (memq p predictive-prog-text-faces))
- (setq predictive-main-dict predictive-prog-mode-main-dict)
- (setq predictive-main-dict nil)))))
-
-(defun predictive-prog-mode ()
- "Enable the `predictive-mode' inside strings and comments
-only, like `flyspell-prog-mode'."
- (interactive)
- (when (fboundp 'predictive-mode)
- (set (make-local-variable 'predictive-main-dict) nil)
- (set (make-local-variable 'predictive-prog-mode-main-dict) predictive-main-dict)
- (if (find 'activate-predictive-inside-comments after-change-functions)
- (progn
- (remove-hook 'after-change-functions 'activate-predictive-inside-comments t)
- (predictive-mode -1))
- (progn
-; (set (make-local-variable 'predictive-use-auto-learn-cache) nil)
- (set (make-local-variable 'predictive-dict-autosave-on-kill-buffer) nil)
- (predictive-mode 1)
- (add-hook 'after-change-functions 'activate-predictive-inside-comments nil t)))))
-
-(provide 'predictive-prog-mode)
+;;; predictive-prog-mode.el ---
+
+;; Copyright (C) 2006 Dmitry Galinsky <dima dot exe at gmail dot com>
+
+;; Authors: Dmitry Galinsky <dima dot exe at gmail dot com>,
+
+;; Keywords: ruby rails languages oop
+;; $URL: svn+ssh://rubyforge/var/svn/emacs-rails/trunk/rails.el $
+;; $Id: predictive-prog-mode.el,v 1.1 2007/08/02 12:32:36 davidswelt Exp $
+
+;;; License
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 2
+;; of the License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program; if not, write to the Free Software
+;; Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+
+;;; Code:
+
+(eval-when-compile
+ (require 'predictive nil t)
+ (require 'completion-ui nil t))
+
+(require 'flyspell)
+
+(defconst predictive-prog-text-faces
+ '(font-lock-comment-face font-lock-doc-face)
+ "Faces corresponding to text in programming-mode buffers.")
+
+(defvar predictive-prog-mode-main-dict nil)
+
+(defun activate-predictive-inside-comments (start end len)
+ "Looking at symbol at point and activate the `predictive-mode'
+if there a string or a comment."
+ (save-excursion
+ (let ((p (get-text-property (- (point) 1) 'face))
+ (f (get-text-property (point) 'face)))
+ (if (or (memq f predictive-prog-text-faces)
+ (memq p predictive-prog-text-faces))
+ (setq predictive-main-dict predictive-prog-mode-main-dict)
+ (setq predictive-main-dict nil)))))
+
+(defun predictive-prog-mode ()
+ "Enable the `predictive-mode' inside strings and comments
+only, like `flyspell-prog-mode'."
+ (interactive)
+ (when (fboundp 'predictive-mode)
+ (set (make-local-variable 'predictive-main-dict) nil)
+ (set (make-local-variable 'predictive-prog-mode-main-dict) predictive-main-dict)
+ (if (find 'activate-predictive-inside-comments after-change-functions)
+ (progn
+ (remove-hook 'after-change-functions 'activate-predictive-inside-comments t)
+ (predictive-mode -1))
+ (progn
+; (set (make-local-variable 'predictive-use-auto-learn-cache) nil)
+ (set (make-local-variable 'predictive-dict-autosave-on-kill-buffer) nil)
+ (predictive-mode 1)
+ (add-hook 'after-change-functions 'activate-predictive-inside-comments nil t)))))
+
+(provide 'predictive-prog-mode)
@@ -1,5 +1,5 @@
-(require 'rails)
-
-(mapcar
- #'byte-compile-file
+(require 'rails)
+
+(mapcar
+ #'byte-compile-file
(directory-files "./" t "\\.el$"))
Oops, something went wrong.

0 comments on commit 5ca8e05

Please sign in to comment.