From: Glenn Morris <rgm@gnu.org>
Date: Mon, 16 Apr 2012 19:02:59 +0000 (-0400)
Subject: * lisp/play/yow.el (yow-file): Use expand-file-name rather than concat.
X-Git-Tag: emacs-24.2.90~471^2~352^2~24
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=68892d275b8dff830ba48e271d8dc71ba84b2b14;p=emacs.git

* lisp/play/yow.el (yow-file): Use expand-file-name rather than concat.
Remove old comment.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 24b564b6d70..68225f1bec8 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2012-04-16  Glenn Morris  <rgm@gnu.org>
 
+	* play/yow.el (yow-file): Use expand-file-name rather than concat.
+
 	* progmodes/perl-mode.el (c-macro-expand):
 	Remove unnecessary autoload (it is in loaddefs.el).
 
diff --git a/lisp/play/yow.el b/lisp/play/yow.el
index fa32fdf8272..864f49709fe 100644
--- a/lisp/play/yow.el
+++ b/lisp/play/yow.el
@@ -1,6 +1,6 @@
 ;;; yow.el --- quote random zippyisms
 
-;; Copyright (C) 1993-1995, 2000-2012  Free Software Foundation, Inc.
+;; Copyright (C) 1993-1995, 2000-2012 Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
 ;; Author: Richard Mlynarik
@@ -24,10 +24,6 @@
 ;;; Commentary:
 
 ;; Important pinheadery for GNU Emacs.
-;;
-;; See cookie1.el for implementation.  Note --- the `n' argument of yow
-;; from the 18.xx implementation is no longer; we only support *random*
-;; random access now.
 
 ;;; Code:
 
@@ -38,7 +34,7 @@
   :prefix "yow-"
   :group 'games)
 
-(defcustom yow-file (concat data-directory "yow.lines")
+(defcustom yow-file (expand-file-name data-directory "yow.lines")
    "File containing pertinent pinhead phrases."
   :type 'file
   :group 'yow)