Andrew's git
/
gitweb.git
/ diff
summary
|
log
|
commit
| diff |
tree
commit
grep
author
committer
pickaxe
?
re
Wrap long lines in docstrings in contrib/emacs/git.el
author
Jakub Narebski
<jnareb@gmail.com>
Thu, 13 Jul 2006 20:22:13 +0000
(22:22 +0200)
committer
Junio C Hamano
<junkio@cox.net>
Fri, 14 Jul 2006 04:21:27 +0000
(21:21 -0700)
Signed-off-by: Jakub Narebski <jnareb@gmail.com>
Signed-off-by: Junio C Hamano <junkio@cox.net>
contrib/emacs/git.el
patch
|
blob
|
history
raw
|
patch
|
inline
| side by side (parent:
d3ba675
)
diff --git
a/contrib/emacs/git.el
b/contrib/emacs/git.el
index ebd00ef9c471f284d26fecd44e3fd7668903b50a..83a845dd942144f408f6f0a81474f174fa8fcd2b 100644
(file)
--- a/
contrib/emacs/git.el
+++ b/
contrib/emacs/git.el
@@
-59,14
+59,16
@@
(defcustom git-committer-name nil
"User name to use for commits.
(defcustom git-committer-name nil
"User name to use for commits.
-The default is to fall back to the repository config, then to `add-log-full-name' and then to `user-full-name'."
+The default is to fall back to the repository config,
+then to `add-log-full-name' and then to `user-full-name'."
:group 'git
:type '(choice (const :tag "Default" nil)
(string :tag "Name")))
(defcustom git-committer-email nil
"Email address to use for commits.
:group 'git
:type '(choice (const :tag "Default" nil)
(string :tag "Name")))
(defcustom git-committer-email nil
"Email address to use for commits.
-The default is to fall back to the git repository config, then to `add-log-mailing-address' and then to `user-mail-address'."
+The default is to fall back to the git repository config,
+then to `add-log-mailing-address' and then to `user-mail-address'."
:group 'git
:type '(choice (const :tag "Default" nil)
(string :tag "Email")))
:group 'git
:type '(choice (const :tag "Default" nil)
(string :tag "Email")))
@@
-86,6
+88,7
@@
The default is to fall back to the git repository config, then to `add-log-maili
:group 'git
:type 'string)
:group 'git
:type 'string)
+
(defface git-status-face
'((((class color) (background light)) (:foreground "purple")))
"Git mode face used to highlight added and modified files."
(defface git-status-face
'((((class color) (background light)) (:foreground "purple")))
"Git mode face used to highlight added and modified files."
@@
-149,7
+152,8
@@
The default is to fall back to the git repository config, then to `add-log-maili
(apply #'call-process "git" nil buffer nil args)))
(defun git-call-process-env-string (env &rest args)
(apply #'call-process "git" nil buffer nil args)))
(defun git-call-process-env-string (env &rest args)
- "Wrapper for call-process that sets environment strings, and returns the process output as a string."
+ "Wrapper for call-process that sets environment strings,
+and returns the process output as a string."
(with-temp-buffer
(and (eq 0 (apply #' git-call-process-env t env args))
(buffer-string))))
(with-temp-buffer
(and (eq 0 (apply #' git-call-process-env t env args))
(buffer-string))))