projects
/
gnus
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Return the group/article number, so that Gnus `^' works as expected.
[gnus]
/
lisp
/
sha1.el
diff --git
a/lisp/sha1.el
b/lisp/sha1.el
index
9fe327e
..
0d97ac6
100644
(file)
--- a/
lisp/sha1.el
+++ b/
lisp/sha1.el
@@
-1,7
+1,7
@@
;;; sha1.el --- SHA1 Secure Hash Algorithm in Emacs-Lisp
;; Copyright (C) 1999, 2001, 2002, 2003, 2004,
;;; sha1.el --- SHA1 Secure Hash Algorithm in Emacs-Lisp
;; Copyright (C) 1999, 2001, 2002, 2003, 2004,
-;; 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; 2005, 2006, 2007, 2008, 2009
, 2010
Free Software Foundation, Inc.
;; Author: Shuhei KOBAYASHI <shuhei@aqua.ocn.ne.jp>
;; Keywords: SHA1, FIPS 180-1
;; Author: Shuhei KOBAYASHI <shuhei@aqua.ocn.ne.jp>
;; Keywords: SHA1, FIPS 180-1
@@
-95,7
+95,7
@@
If this variable is set to nil, use internal function only."
(setq prog sha1-program
args nil))
(with-temp-buffer
(setq prog sha1-program
args nil))
(with-temp-buffer
- (
set-buffer-multibyte nil
)
+ (
unless (featurep 'xemacs) (set-buffer-multibyte nil)
)
(insert string)
(apply (function call-process-region)
(point-min) (point-max)
(insert string)
(apply (function call-process-region)
(point-min) (point-max)
@@
-439,5
+439,4
@@
If BINARY is non-nil, return a string in binary form."
(provide 'sha1)
(provide 'sha1)
-;; arch-tag: c0f9abd0-ffc1-4557-aac6-ece7f2d4c901
;;; sha1.el ends here
;;; sha1.el ends here