diff options
| author | Ken Raeburn <raeburn@raeburn.org> | 1999-09-12 05:07:01 +0000 |
|---|---|---|
| committer | Ken Raeburn <raeburn@raeburn.org> | 1999-09-12 05:07:01 +0000 |
| commit | 70949dac51f3e975477e6b1a38cc78625efc4a40 (patch) | |
| tree | d0048c9a0b9bc18a9dd65e094b0fce43d1067f9b /src/dired.c | |
| parent | e952bf4445863c01763f402389b38c00f77e024b (diff) | |
| download | emacs-70949dac51f3e975477e6b1a38cc78625efc4a40.tar.gz | |
Use XCAR, XCDR, XFLOAT_DATA instead of explicit member access.
Diffstat (limited to 'src/dired.c')
| -rw-r--r-- | src/dired.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/dired.c b/src/dired.c index 49e95a54795..d9c2ab0f865 100644 --- a/src/dired.c +++ b/src/dired.c @@ -486,9 +486,9 @@ file_name_completion (file, dirname, all_flag, ver_flag) if (!passcount && len > XSTRING (encoded_file)->size) /* and exit this for loop if a match is found */ for (tem = Vcompletion_ignored_extensions; - CONSP (tem); tem = XCONS (tem)->cdr) + CONSP (tem); tem = XCDR (tem)) { - elt = XCONS (tem)->car; + elt = XCAR (tem); if (!STRINGP (elt)) continue; skip = len - XSTRING (elt)->size; if (skip < 0) continue; @@ -514,9 +514,9 @@ file_name_completion (file, dirname, all_flag, ver_flag) /* Ignore this element if it fails to match all the regexps. */ for (regexps = Vcompletion_regexp_list; CONSP (regexps); - regexps = XCONS (regexps)->cdr) + regexps = XCDR (regexps)) { - tem = Fstring_match (XCONS (regexps)->car, elt, zero); + tem = Fstring_match (XCAR (regexps), elt, zero); if (NILP (tem)) break; } |