HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
662c2ef
)
(get_system_name): Don't crash if Vsystem_name does not contain a string.
author
Richard M. Stallman
<rms@gnu.org>
Sat, 12 Jul 1997 06:52:06 +0000
(06:52 +0000)
committer
Richard M. Stallman
<rms@gnu.org>
Sat, 12 Jul 1997 06:52:06 +0000
(06:52 +0000)
src/editfns.c
patch
|
blob
|
blame
|
history
diff --git
a/src/editfns.c
b/src/editfns.c
index
c3d3eed
..
cdcf016
100644
(file)
--- a/
src/editfns.c
+++ b/
src/editfns.c
@@
-747,7
+747,10
@@
DEFUN ("system-name", Fsystem_name, Ssystem_name, 0, 0, 0,
char *
get_system_name ()
{
- return (char *) XSTRING (Vsystem_name)->data;
+ if (STRINGP (Vsystem_name))
+ return (char *) XSTRING (Vsystem_name)->data;
+ else
+ return "";
}
DEFUN ("emacs-pid", Femacs_pid, Semacs_pid, 0, 0, 0,