/[emacs]/emacs/lisp/progmodes/sh-script.el
ViewVC logotype

Diff of /emacs/lisp/progmodes/sh-script.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.142 by rms, Sun Dec 5 14:19:38 2004 UTC revision 1.143 by rms, Fri Dec 31 14:57:21 2004 UTC
# Line 495  This is buffer-local in every such buffe Line 495  This is buffer-local in every such buffe
495    
496  (defcustom sh-require-final-newline  (defcustom sh-require-final-newline
497    '((csh . t)    '((csh . t)
498      (pdksh . t)      (pdksh . t))
     (rc . require-final-newline)  
     (sh . require-final-newline))  
499    "*Value of `require-final-newline' in Shell-Script mode buffers.    "*Value of `require-final-newline' in Shell-Script mode buffers.
500    \(SHELL . t) means use the value of `mode-require-final-newline' for SHELL.
501  See `sh-feature'."  See `sh-feature'."
502    :type '(repeat (cons (symbol :tag "Shell")    :type '(repeat (cons (symbol :tag "Shell")
503                         (choice (const :tag "require" t)                         (choice (const :tag "require" t)
# Line 1485  Calls the value of `sh-set-shell-hook' i Line 1484  Calls the value of `sh-set-shell-hook' i
1484              (executable-set-magic shell (sh-feature sh-shell-arg)              (executable-set-magic shell (sh-feature sh-shell-arg)
1485                                    no-query-flag insert-flag)))                                    no-query-flag insert-flag)))
1486    (let ((tem (sh-feature sh-require-final-newline)))    (let ((tem (sh-feature sh-require-final-newline)))
1487      (unless (eq tem 'require-final-newline)      (if (eq tem t)
1488        (setq require-final-newline tem)))          (setq require-final-newline mode-require-final-newline)))
1489    (setq    (setq
1490          comment-start-skip "#+[\t ]*"          comment-start-skip "#+[\t ]*"
1491          local-abbrev-table sh-mode-abbrev-table          local-abbrev-table sh-mode-abbrev-table

Legend:
Removed from v.1.142  
changed lines
  Added in v.1.143

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26