diff --git a/.gitignore b/.gitignore
index ac7c981..a09819b 100644
--- a/.gitignore
+++ b/.gitignore
@@ -52,3 +52,4 @@ anaconda-15.2.tar.bz2
 /anaconda-18.11.tar.bz2
 /anaconda-18.38.tar.bz2
 /anaconda-18.39.tar.bz2
+/anaconda-18.40.tar.bz2
diff --git a/anaconda.spec b/anaconda.spec
index 72bbb33..294b6fc 100644
--- a/anaconda.spec
+++ b/anaconda.spec
@@ -2,7 +2,7 @@
 
 Summary: Graphical system installer
 Name:    anaconda
-Version: 18.39
+Version: 18.40
 Release: 1%{?dist}
 License: GPLv2+
 Group:   Applications/System
@@ -47,6 +47,7 @@ BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
 %define pythonurlgrabberver 3.9.1-5
 %define utillinuxver 2.15.1
 %define syslinuxver 3.73
+%define dracutver 024-16
 
 BuildRequires: audit-libs-devel
 BuildRequires: bzip2-devel
@@ -161,7 +162,9 @@ Requires: nm-connection-editor
 Requires: dhclient
 Requires: anaconda-yum-plugins
 Requires: libselinux-python >= %{libselinuxver}
+%ifnarch s390 s390x
 Requires: fcoe-utils >= %{fcoeutilsver}
+%endif
 Requires: kbd
 Requires: chrony
 Requires: rdate
@@ -205,7 +208,7 @@ documentation for working with this library.
 %package dracut
 Summary: The anaconda dracut module
 BuildArch: noarch
-Requires: dracut >= 19
+Requires: dracut >= %{dracutver}
 Requires: dracut-network
 Requires: xz
 Requires: pykickstart
@@ -300,6 +303,82 @@ update-desktop-database &> /dev/null || :
 %{_prefix}/lib/dracut/modules.d/80%{name}/*
 
 %changelog
+* Fri Jan 11 2013 Brian C. Lane <bcl@redhat.com> - 18.40-1
+- Prepare structures to save spoke completenes for firstboot and GIE (msivak)
+- Do not call exit at the end of GUI interface, just quit the main loop
+  (msivak)
+- Improve handling of .py and .pyc equivalence while collecting classes
+  (msivak)
+- Set default language to en_US.UTF-8 (#891379) (msivak)
+- Set the local hostname during installation (vpodzime)
+- Refactor and cleanup our localization module (vpodzime)
+- Network spoke: use correct state value to display device status. (rvykydal)
+- drop fcoe-utils dependency for s390x (rhbz#894025) (sbueno+anaconda)
+- More TODO list wrangling. (clumens)
+- On storage, remove the "Continue" button and make "Done" do it all (#882737).
+  (clumens)
+- getLUKSPassphrase is no longer used, so kill it. (clumens)
+- "Hub" shouldn't be in the title for any text mode hub. (clumens)
+- Do not lightbox any dialogs on the custom storage spoke (#875291). (clumens)
+- Revert "Do not lightbox the Add Mountpoint dialog (#875291)." (clumens)
+- Don't allow changing a VG name to empty in the VG editor (#892395). (clumens)
+- Check country_layouts is not None when using it (#893026) (vpodzime)
+- Don't redownload payload from closest mirror only if we actually have some
+  (#892665) (rvykydal)
+- Remove some modules obsoleted by the packaging module. (dlehman)
+- Prefer country over language when returning default layout (#867110)
+  (vpodzime)
+- Fix Quit button in standalone network spoke (#892120) (rvykydal)
+- Network spoke: add sanity check for hostname setting (#856456) (rvykydal)
+- Network spoke: add hostname setting (#856456) (rvykydal)
+- Fix completeness check for md fwraid arrays. (#892621) (dlehman)
+- Fix handling of failure to create a new container. (#892046) (dlehman)
+- Force disk selection for interactive installs. (#888293) (dlehman)
+- Mark another string for translation (#892760). (clumens)
+- Do not lightbox the Add Mountpoint dialog (#875291). (clumens)
+- Strip out pango markup before attempting to match languages (#892463).
+  (clumens)
+- Mark the live progress hub message for translation (#892069). (clumens)
+- Allow deleting whole disks using the reclaim dialog (#880686). (clumens)
+- Don't allow mountpoints to start with /dev (#891447). (clumens)
+- Disable the configure button for pre-existing devices (#888296). (clumens)
+- Add keyboard mnemonics to the spoke selectors, too. (clumens)
+- Add keyboard accelerators to a whole lot of widgets (#864964). (clumens)
+- Try fallback if none exactly matching language is found (#891487) (vpodzime)
+- Only skip welcome screen for ks installs (#891755) (bcl)
+- protect getDirSize from vanishing files (#891759) (bcl)
+- start vnc without ip address (#832510) (bcl)
+- Update physical device's sysfs path for btrfs (sub)volumes. (#891443)
+  (dlehman)
+- Wrap text on the updates checkbox to fix screen placement (#888880).
+  (clumens)
+- The return value from execWithRedirect is an int (#891313). (clumens)
+- Add placeholder names to a couple strings (#890157). (clumens)
+- Fix multiple copies of spokes appearing from update image (msivak)
+- Import pyanaconda.addons in the anaconda script (vpodzime)
+- Update the API which controls where should spokes be displayed (msivak)
+- Update the way we look for glade files, spokes, hubs and categories (msivak)
+- Make screenshot routines reusable in Firstboot (msivak)
+- Do not fail when missing directories are present in addon paths (msivak)
+- Pass addons paths to user interfaces (msivak)
+- hook up help window close button (#889570) (bcl)
+- add setKeyboardCheckButton to list of things to translate (#889352) (bcl)
+- Mark for translation and show translated some more GUI elements (#877658)
+  (vpodzime)
+- Translate storage errors (#877658) (vpodzime)
+- Don't allow changing the boot disk from inside the custom spoke. (#889585)
+  (dlehman)
+- Add help text and a help button to the custom storage spoke. (#889570)
+  (dlehman)
+- Allow /boot on btrfs subvol if using grub2. (#888603,868465) (dlehman)
+- Don't keep old device name when switching to btrfs in custom. (dlehman)
+- Fix container member set management for md arrays. (#889101) (dlehman)
+- Include incomplete devices when listing dependant devices. (#889330)
+  (dlehman)
+- Use systemd to run checkisomd5 (#874486) (harald)
+- fixup direct nfs iso url handling (#879187) (bcl)
+- fixup nfs repo install code (#879187) (bcl)
+
 * Wed Dec 19 2012 Brian C. Lane <bcl@redhat.com> - 18.39-1
 - Add more yum locking to yumpayload (#860022) (bcl)
 - The percent bar can go in the same column as the space label. (clumens)
diff --git a/sources b/sources
index 8895b37..61aab8e 100644
--- a/sources
+++ b/sources
@@ -1 +1 @@
-0e7781068e153b2f6a9d87eda9fed5d8  anaconda-18.39.tar.bz2
+749c1f9c6419e83640bf62a3ca71f6b3  anaconda-18.40.tar.bz2