aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2003-02-10 22:27:33 +0000
committerStefan Monnier2003-02-10 22:27:33 +0000
commit9a0fc3da6fd595c3f95f856cdfadc9a6b0dfb2c4 (patch)
tree0c8522efe424d9b39001611c2a3917e40b637e34
parent9925c4191b6deb8efd24dceed27ff2aa62b6fa05 (diff)
downloademacs-9a0fc3da6fd595c3f95f856cdfadc9a6b0dfb2c4.tar.gz
emacs-9a0fc3da6fd595c3f95f856cdfadc9a6b0dfb2c4.zip
(e): Make it a variable.
-rw-r--r--lisp/ChangeLog76
-rw-r--r--lisp/float-sup.el4
2 files changed, 51 insertions, 29 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 089f43d2d98..b9637fe8b0e 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,27 @@
12003-02-10 Stefan Monnier <monnier@cs.yale.edu>
2
3 * ffap.el (ffap-complete-as-file-p):
4 Use minibuffer-completing-file-name.
5
6 * international/mule.el (load-with-code-conversion): Use push.
7
8 * font-core.el (font-lock-defontify): Use restore-buffer-modified-p.
9
10 * gud.el (gud-gdb-run-command-fetch-lines, gud-display-line):
11 Use with-current-buffer and simplify.
12
13 * help-mode.el (help-xref-on-pp): Only add xref if the text
14 is less than 5K.
15
16 * pcvs-parse.el (cvs-parse-table): "no longer in repo" does not
17 make the file dead if we used the -n arg.
18
19 * emacs-lisp/cl-macs.el (process-get): Add setf method.
20
21 * server.el (server-previous-strings): Remove.
22 (server-process-filter): Use (process-get 'previous-string) instead.
23 (server-sentinel): Remove code made superfluous.
24
12003-02-10 Luc Teirlinck <teirllm@mail.auburn.edu> 252003-02-10 Luc Teirlinck <teirllm@mail.auburn.edu>
2 26
3 * info.el (Info-follow-nearest-node): Implement new behavior. 27 * info.el (Info-follow-nearest-node): Implement new behavior.
@@ -31,9 +55,9 @@
31 55
322003-02-09 Martin Stjernholm <mast@lysator.liu.se> 562003-02-09 Martin Stjernholm <mast@lysator.liu.se>
33 57
34 * progmodes/cc-mode.el (c-basic-common-init): Install 58 * progmodes/cc-mode.el (c-basic-common-init):
35 `c-fill-paragraph' on `fill-paragraph-function'. Although 59 Install `c-fill-paragraph' on `fill-paragraph-function'.
36 it's not the normal way to call it in a CC Mode buffer it 60 Although it's not the normal way to call it in a CC Mode buffer it
37 makes a direct call to `fill-paragraph' work better. 61 makes a direct call to `fill-paragraph' work better.
38 62
392003-02-08 Kim F. Storm <storm@cua.dk> 632003-02-08 Kim F. Storm <storm@cua.dk>
@@ -109,15 +133,14 @@
109 bytes to ascii text. 133 bytes to ascii text.
110 (top-level): Avoid byte-compiler warnings of unused variables if 134 (top-level): Avoid byte-compiler warnings of unused variables if
111 the byte-compiler supports this. This is for the 135 the byte-compiler supports this. This is for the
112 with-parsed-tramp-file-name macro which is wont to produce such 136 with-parsed-tramp-file-name macro which is wont to produce such stuff.
113 stuff.
114 137
1152003-02-05 Michael Albinus <Michael.Albinus@alcatel.de> 1382003-02-05 Michael Albinus <Michael.Albinus@alcatel.de>
116 139
117 * net/tramp.el (tramp-handle-directory-file-name): Handle the case 140 * net/tramp.el (tramp-handle-directory-file-name): Handle the case
118 PATH is "". 141 PATH is "".
119 (tramp-completion-handle-file-name-all-completions): Define 142 (tramp-completion-handle-file-name-all-completions):
120 `tramp-current-user' locally. See `tramp-parse-passwd'. 143 Define `tramp-current-user' locally. See `tramp-parse-passwd'.
121 (tramp-parse-passwd): For su-alike methods it would be desirable 144 (tramp-parse-passwd): For su-alike methods it would be desirable
122 to return "root@localhost" as default. Unfortunately, we have no 145 to return "root@localhost" as default. Unfortunately, we have no
123 information whether any user name has been typed already. So we 146 information whether any user name has been typed already. So we
@@ -140,8 +163,8 @@
140 different hosts. So we use virtual device numbers, generated by 163 different hosts. So we use virtual device numbers, generated by
141 `tramp-get-device'. Both Ange-FTP and EFS use device number -1. 164 `tramp-get-device'. Both Ange-FTP and EFS use device number -1.
142 In order to be different, we use device number (-1 x), whereby "x" 165 In order to be different, we use device number (-1 x), whereby "x"
143 is unique for a given (multi-method method user host). Suggested 166 is unique for a given (multi-method method user host).
144 by Kai. 167 Suggested by Kai.
145 (tramp-perl-file-attributes): Always return device number -1. 168 (tramp-perl-file-attributes): Always return device number -1.
146 There will be a virtual device number set in 169 There will be a virtual device number set in
147 `tramp-handle-file-attributes', which replaces this one. 170 `tramp-handle-file-attributes', which replaces this one.
@@ -149,50 +172,47 @@
149 (tramp-get-device): New function. Returns the virtual device 172 (tramp-get-device): New function. Returns the virtual device
150 number. If it doesn't exist, generate a new one. 173 number. If it doesn't exist, generate a new one.
151 (tramp-handle-file-regular-p): Use Emacs file name primitives 174 (tramp-handle-file-regular-p): Use Emacs file name primitives
152 instead of calling tramp-handle-* equivalents directly. Needed 175 instead of calling tramp-handle-* equivalents directly.
153 for tramp-smb. 176 Needed for tramp-smb.
154 (tramp-completion-function-alist-ssh): Add parsing of 177 (tramp-completion-function-alist-ssh): Add parsing of
155 "/etc/ssh_config" and "~/.ssh/config". Suggested by Kai. 178 "/etc/ssh_config" and "~/.ssh/config". Suggested by Kai.
156 (tramp-completion-function-alist, tramp-set-completion-function): 179 (tramp-completion-function-alist, tramp-set-completion-function):
157 Doc string update. 180 Doc string update.
158 (tramp-parse-sconfig, tramp-parse-sconfig-group): New functions. 181 (tramp-parse-sconfig, tramp-parse-sconfig-group): New functions.
159 Provide parsing of "~/.ssh/config" style files. 182 Provide parsing of "~/.ssh/config" style files.
160 (tramp-completion-handle-expand-file-name): Apply 183 (tramp-completion-handle-expand-file-name):
161 `tramp-drop-volume-letter'. Otherwise, there are problems on W32 184 Apply `tramp-drop-volume-letter'. Otherwise, there are problems
162 systems. 185 on W32 systems.
163 (tramp-completion-mode): Perform check (integerp last-input-event) 186 (tramp-completion-mode): Perform check (integerp last-input-event)
164 before (event-modifiers last-input-event) -- there might be 187 before (event-modifiers last-input-event) -- there might be
165 problems if `last-input-event' is a mouse event. 188 problems if `last-input-event' is a mouse event.
166 (tramp-parse-rhosts, tramp-parse-shosts) 189 (tramp-parse-rhosts, tramp-parse-shosts)
167 (tramp-parse-hosts, tramp-parse-passwd, tramp-parse-netrc): Use 190 (tramp-parse-hosts, tramp-parse-passwd, tramp-parse-netrc):
168 `file-readable-p' instead of `file-exists-p'. Otherwise these 191 Use `file-readable-p' instead of `file-exists-p'. Otherwise these
169 functions might block. Reported by <kin@neoscale.com>. 192 functions might block. Reported by <kin@neoscale.com>.
170 193
171 * net/tramp-ftp.el (top-level): eval-after-load "ange-ftp" 194 * net/tramp-ftp.el (top-level): eval-after-load "ange-ftp"
172 '(tramp-disable-ange-ftp). Suggested by Kai. 195 '(tramp-disable-ange-ftp). Suggested by Kai.
173 (tramp-ftp-file-name-handler): `tramp-disable-ange-ftp' not needed 196 (tramp-ftp-file-name-handler): `tramp-disable-ange-ftp' not needed
174 any longer. 197 any longer.
175 (top-level): Defaults for `tramp-default-method-alist' must be a 198 (top-level): Defaults for `tramp-default-method-alist' must be a list.
176 list.
177 199
178 * net/tramp-smb.el (tramp-smb-file-name-handler-alist): Apply 200 * net/tramp-smb.el (tramp-smb-file-name-handler-alist):
179 `tramp-handle-directory-file-name'. 201 Apply `tramp-handle-directory-file-name'.
180 (tramp-smb-devices, tramp-smb-get-device): Removed. Functionality 202 (tramp-smb-devices, tramp-smb-get-device): Remove.
181 moved to tramp.el. 203 Functionality moved to tramp.el.
182 (tramp-smb-handle-file-attributes): Apply `tramp-get-device'. 204 (tramp-smb-handle-file-attributes): Apply `tramp-get-device'.
183 ATIME and CTIME are (0 0) now (= "don't know"), which is more 205 ATIME and CTIME are (0 0) now (= "don't know"), which is more honest.
184 honest.
185 (tramp-smb-handle-make-directory): Use Emacs file name primitives 206 (tramp-smb-handle-make-directory): Use Emacs file name primitives
186 instead of calling tramp-smb-handle-* equivalents directly. 207 instead of calling tramp-smb-handle-* equivalents directly.
187 (tramp-smb-read-file-entry): Return size as a number but a string. 208 (tramp-smb-read-file-entry): Return size as a number but a string.
188 (tramp-smb-get-device, tramp-smb-get-inode): New functions. 209 (tramp-smb-get-device, tramp-smb-get-inode): New functions.
189 Device number and inode number don't exist for SMB files. 210 Device number and inode number don't exist for SMB files.
190 Therefore we must generate virtual ones. 211 Therefore we must generate virtual ones.
191 (tramp-smb-devices, tramp-smb-inodes): New variables. Keep 212 (tramp-smb-devices, tramp-smb-inodes): New variables.
192 generated virtual device numbers and inodes numbers for SMB files. 213 Keep generated virtual device numbers and inodes numbers for SMB files.
193 (tramp-smb-handle-file-attributes): Apply them. 214 (tramp-smb-handle-file-attributes): Apply them.
194 (top-level): Defaults for `tramp-default-method-alist' must be a 215 (top-level): Defaults for `tramp-default-method-alist' must be a list.
195 list.
196 216
1972003-02-05 Stefan Monnier <monnier@cs.yale.edu> 2172003-02-05 Stefan Monnier <monnier@cs.yale.edu>
198 218
diff --git a/lisp/float-sup.el b/lisp/float-sup.el
index b587a51b85b..29b918a3bc3 100644
--- a/lisp/float-sup.el
+++ b/lisp/float-sup.el
@@ -36,7 +36,9 @@
36;; provide an easy hook to tell if we are running with floats or not. 36;; provide an easy hook to tell if we are running with floats or not.
37;; define pi and e via math-lib calls. (much less prone to killer typos.) 37;; define pi and e via math-lib calls. (much less prone to killer typos.)
38(defconst pi (* 4 (atan 1)) "The value of Pi (3.1415926...).") 38(defconst pi (* 4 (atan 1)) "The value of Pi (3.1415926...).")
39(defconst e (exp 1) "The value of e (2.7182818...).") 39;; It's too inconvenient to make `e' a constant because it's used as
40;; a temporary variable all the time.
41(defvar e (exp 1) "The value of e (2.7182818...).")
40 42
41;; Careful when editing this file ... typos here will be hard to spot. 43;; Careful when editing this file ... typos here will be hard to spot.
42;; (defconst pi 3.14159265358979323846264338327 44;; (defconst pi 3.14159265358979323846264338327