Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
bead134f
Commit
bead134f
authored
Nov 16, 2005
by
Stefan Monnier
Browse files
(easy-menu-intern): Don't define.
(pr-get-symbol): Use easy-menu-intern only if defined.
parent
b8386753
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
15 additions
and
8 deletions
+15
-8
lisp/ChangeLog
lisp/ChangeLog
+11
-0
lisp/printing.el
lisp/printing.el
+4
-8
No files found.
lisp/ChangeLog
View file @
bead134f
2005-11-16 Stefan Monnier <monnier@iro.umontreal.ca>
* printing.el (easy-menu-intern): Don't define.
(pr-get-symbol): Use easy-menu-intern only if defined.
* simple.el (blink-matching-open): Simplify a bit.
(completion-setup-function): Fix the case of partial-completion-mode
when the minibuffer's contents start with "-".
Obey completion-base-size-function even when
minibuffer-completing-file-name is non-nil.
2005-11-16 Richard M. Stallman <rms@gnu.org>
* net/eudcb-ph.el (eudc-ph-open-session):
...
...
lisp/printing.el
View file @
bead134f
...
...
@@ -1042,12 +1042,6 @@ Please send all bug fixes and enhancements to
;; To avoid compilation gripes
(
or
(
fboundp
'easy-menu-intern
)
; hacked from easymenu.el
(
defsubst
easy-menu-intern
(
s
)
(
if
(
stringp
s
)
(
intern
s
)
s
)))
(
or
(
fboundp
'subst-char-in-string
)
; hacked from subr.el
(
defun
subst-char-in-string
(
fromchar
tochar
string
&optional
inplace
)
"Replace FROMCHAR with TOCHAR in STRING each time it occurs.
...
...
@@ -2803,8 +2797,10 @@ See `pr-ps-printer-alist'.")
(
and
pr-print-using-ghostscript
(
not
pr-spool-p
)))
(
defun
pr-get-symbol
(
name
)
(
easy-menu-intern
name
))
(
defalias
'pr-get-symbol
(
if
(
fboundp
'easy-menu-intern
)
'easy-menu-intern
(
lambda
(
s
)
(
if
(
stringp
s
)
(
intern
s
)
s
))))
(
cond
((
featurep
'xemacs
)
; XEmacs
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment